Displaying 1 result from an estimated 1 matches for "dacttable".
Did you mean:
ac_table
2010 Sep 01
0
problems with JGR and standard R GUI closing during calculations
...{
posixtime <- as.POSIXct(paste(as.Date(dates(x)), times(x)%%1))
format(posixtime, patt)
}
###import data ***(where the GUI will close)****
smps <- read.smps("SMPS_OL_cuml_v2.txt")
fccn <- read.fCCN("fCCN_ONLY_forSMPS_v1.txt")
###output table by fCCN times
## loop
DactTable <- data.frame(times=fccn$times,Dact=NA)
for( x in 2:length(smps$time) ) {
## find fCCN times corresonding to SMPS
selection <- (fccn$times >= smps$time[x-1] &
fccn$times <= smps$time[x])
## if any, calculate activation diameters, otherwise, NA
if( any(selecti...