Displaying 1 result from an estimated 1 matches for "kurve2".
Did you mean:
kurve
2009 Nov 26
1
Arrhenius Plot 2 with lattice
...145,151,156,160,165,170,175,180,185,190,195,200,206,210,216,220,225,230,235,240,247,250,255,261,265,270,275,280,285,290,295,300)
#Here I transform my data to make this Arrhenius Plot:
Temp2<-c(1000/Temp)
n2log<-c(log10(n2))
#This function should be plottet as log10(n)~1000/T into the data:
kurve2<-function(T)2^-.5*sqrt(1e17*2*6*I(T^1.5)*(2*pi*0.689*9.109e-31*1.38e-23/43.9e-68)^1.5)*exp(-.047*1.6e-19/(2*1.38e-23*T))
#Here is the plot-function, but I don't know the argument for
#panel.curve()
trellis.device(jpeg,file="Tabh1.jpg",color=FALSE)
n2plot<-xyplot(n2log~Temp2,xl...