Различия
Здесь показаны различия между двумя версиями данной страницы.
Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
sensors:p:amp_simakin [2017/04/09 07:30] lesnik56 |
sensors:p:amp_simakin [2018/11/16 13:53] (текущий) admin |
||
---|---|---|---|
Строка 68: | Строка 68: | ||
df1<-data.frame(Name='Summary', P_max=Pmax,P_mean=Pmean,comment=comm,n_points=n1,end=' '); | df1<-data.frame(Name='Summary', P_max=Pmax,P_mean=Pmean,comment=comm,n_points=n1,end=' '); | ||
- | df2<-data.frame(Name=Amp$Name, P_max=P,P_mean=' ',comment=' ',n_points=' ',end=' '); | + | df2<-data.frame(Name=Amp$Name, P_max=P,P_mean=0.0,comment=' ',n_points=' ',end=' '); |
- | df0<-data.frame(Name='_', P_max='_',P_mean='_',comment='_',n_points=' ',end=' '); | + | df0<-data.frame(Name='_', P_max=0.0,P_mean=0.0,comment='_',n_points=' ',end=' '); |
return (rbind(df1,df0,df2)); | return (rbind(df1,df0,df2)); | ||
Строка 95: | Строка 95: | ||
CaO_wtp=c(11.490, 11.490), Na2O_wtp=c(1.870, 1.870), | CaO_wtp=c(11.490, 11.490), Na2O_wtp=c(1.870, 1.870), | ||
K2O_wtp=c(1.060, 1.060)); | K2O_wtp=c(1.060, 1.060)); | ||
+ | | ||
#Расчет | #Расчет | ||
result <- sensors.p.amp_simakin(test_data); | result <- sensors.p.amp_simakin(test_data); |