search for: n2log

...)]-test$V1[c(7)])) #....... Temp<-c(79,80,85,90,95,100,106,110,115,120,125,132,135,140,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()...