https://nd.psychstat.org/ 2026-05-13T16:15:12+00:00 https://nd.psychstat.org/ https://nd.psychstat.org/_media/wiki/dokuwiki.svg text/html 2016-01-24T14:48:26+00:00 Anonymous (anonymous@undisclosed.example.com) https://nd.psychstat.org/lab/projects/19time_delay_embedding_dfa/index Time delay embedding for DFA * R code to process results from mkfm6 * Non-stationary data Programs * Mplus input file for continuous data TITLE: categorical DFM DATA: FILE = data1.txt; VARIABLE: NAMES = y11 y12 y13 y14 y15 y16 y17 y18 y21 y22 y23 y24 y25 y26 y27 y28; USEVARIABLES = y11 y12 y13 y14 y15 y16 y17 y18 y21 y22 y23 y24 y25 y26 y27 y28; MODEL: !Lag 0 f11 by y11 @ 1; … text/html 2016-01-24T14:48:26+00:00 Anonymous (anonymous@undisclosed.example.com) https://nd.psychstat.org/lab/projects/19time_delay_embedding_dfa/r_code_to_process_results_from_mkfm6 R code related to Kalman filter methods * Process results ## process results allse<-NULL allpar<-NULL SS<-200 for (i in 1:500){ filename<-paste('out', SS, i, '.txt', sep='') if (file.exists(filename)){ temp<-readLines(filename) temp<-temp[substr(temp, 1, 4)==' nr '] temp<-substr(temp, 15, 71) if (length(temp)>0){ temp<-read.table(textConnection(temp)) allse<-rbind(allse, temp$V5) allpar<-rbind(allpar, temp$V1) } } } index<-(apply(allse, 1, min) > 0) & (apply(allse, 1,…