Displaying 1 result from an estimated 1 matches for "t300_both".
2009 Nov 26
1
Arrhenius Plot 2 with lattice
Hello,
sorry for incomplete code...
with this I read the file and calculate my stuff. I have a plenty of
them 80-300K every 5 Kelvin. I start with 79K, 80K...300K
test<-read.table("T300_both.txt",header=FALSE,sep="")
RH2<-c(RH2,2.5e7*.32e-4/100e-6/5100*(test$V3[c(2)]-test$V3[c(1)]+test
$V3[c(4)]-test$V3[c(3)]))
n2<-c(n2,-1/(RH2[c(46)]*1.60217e-19))
PA2<-c(1.1331/100e-6*.32e-4*(test$V1[c(2)]+test$V1[c(4)]-test
$V1[c(1)]-test$V1[c(3)]))
PB2<-c(1.1331/100e-6*.32...