Ejemplo efecto de la temperatura

# Script del ejemplo de la Desaparicion del aldehido, Química de Raymond Chang en R-Studio
# Se han realizado experimentos previos para calcular las leyes de velocidad de la desaparición del aldehido a diferentes temperaturas: 700,730,760,790,810 C, de las cuales se determinaron los siguientes valores para k: 0.011,0.035,0.105,0.343,0.789 M-1s-1. Hallar la Energía de activación (Ea) y el factor de frecuencia de colisión (A), aplicando la Ecuación de Arrhenius. 
k=c(0.011,0.035,0.105,0.343,0.789)  # introduce los valores de las leyes de velocidad (k)
T=c(700,730,760,790,810)  # introduce los valores de la temperatura (T)
lnk=log(k) # calcula el logaritmo natural de "k"
iT=1/T # calcula el inverso de "T"
plot(iT,lnk)  # grafica el inverso de la temperatura "iT" vs logaritmo natural de las constantes de velocidad "lnk"
lm(lnk~iT) # calcula la regresión linear de el inverso de la temperatura "iT" vs logaritmo natural de las constantes de velocidad "lnk" de la forma: lm(y~x)
R=8.714 #  introduce el valor de la constante de los gases ideales en j/k*mol 
m=-21880.87 # asigna a "m" copia el valor de la pendiente de la  regresión lm(lnk~iT)
Ea=-(m*R) # calcula la energía de activación del despeje da la fórmula : m=-Ea/R
Ea # imprime el valor de la Energía de activación 
 b=26.66  # copia el valor de la intersección de la regresión lm(lnk~iT)
A=exp(b) # calcula el valor del factor de colisión "A"
 A # imprime el valor del factor de colisión 
Fin del script 

Comentarios