2026-01-27 14:40:46 +01:00
|
|
|
[{"Config":{"clearAuto":true,"strictScope":false,"group":"anonymous","mode":"r","file":"rbook.signal.ml","fontSize":14,"thisthat":true,"turbo":true,"user":"kapideje","docUrl":"localhost:5558","projUrl":"edu-9.de:5550","webclipTime":300,"webclipUrl":"localhost:9176","webxUrl":"localhost:9177","modules":["math.plugin","image.plugin"],"workdir":"/home/sbosse/proj/SimNDT2b/demo/plate1n","nw":"0.41.3","version":"1.15.10","wex":{"http":"http://localhost:11111","ws":"ws://localhost:11112"},"strict":true,"evalUser":"RRun","overlay":true}},{"Notes":[]},{},{"options":{"eval":"_PxEnUf_ZnVuY3Rpb24gKHRleHQpIHsKICAgICAgICAgIHZhciBjb250ZXh0ID0gUi5jb250ZXh0OwogICAgICAgICAgUi5ydW4odGV4dCxjb250ZXh0KQogICAgICAgICAgaWYgKFIud29ya2VyLmN1cnJlbnQpIHNldFRpbWVvdXQoZnVuY3Rpb24gKCkgewogICAgICAgICAgICAvLyB1cGRhdGUgd29ya2VyIGNvbnRleHQKICAgICAgICAgICAgdmFyIGluaXRzID0ge30sbW9kcz1bXTsKICAgICAgICAgICAgZm9yICh2YXIgaSBpbiBSLmxpYi5tb2R1bGVzKSB7CiAgICAgICAgICAgICAgdmFyIG1vZCA9IFIubGliLm1vZHVsZXNbaV0sCiAgICAgICAgICAgICAgICAgIE1PRCA9IG1vZC50b1VwcGVyQ2FzZSgpLAogICAgICAgICAgICAgICAgICBmb28gPSBNT0QrJyRJbml0JzsKICAgICAgICAgICAgICAvLyBDb2RlLnByaW50KCJVcGRhdGluZyB3b3JrZXIgUiAuLiAiLG1vZCk7CiAgICAgICAgICAgICAgaWYgKF9nbG9iYWxbZm9vXSkgIHsgbW9kcy5wdXNoKG1vZCk7IGluaXRzW2Zvb109X2dsb2JhbFtmb29dIH0KICAgICAgICAgICAgfQogICAgICAgICAgICBSLndvcmtlci5jdXJyZW50Lm1vZHVsZShpbml0cykKICAgICAgICAgIH0sMTAwKQogICAgICAgIH0=","label":"Install Libraries","mode":"r","overlay":2,"heightC":100,"heightE":10,"collapsed":false},"code":"install.packages({\"math\",\"ml\",\"image\"})"},{"options":{"eval":"_PxEnUf_ZnVuY3Rpb24gKHRleHQpIHsKICAgICAgICAgIHZhciBjb250ZXh0ID0gUi5jb250ZXh0OwogICAgICAgICAgUi5ydW4odGV4dCxjb250ZXh0KQogICAgICAgIH0=","label":"Start Worker","mode":"r","overlay":2,"heightC":100,"heightE":10,"collapsed":false},"code":"worker()"},{"options":{"label":"Load Data","mode":"r","overlay":1,"evalUser":"RRun","heightC":30,"heightE":30,"collapsed":false},"code":"parameter { dir:'./data', cut:40 }\nuse math,csv,file\nfiles = list.files(parameter.dir)\ndata = data.frame(x=NA,y=NA,field=NA,data=NA)\nfor(file in files) {\n print(file)\n x = as.numeric(grep('x([0-9]+)',file,match=TRUE,value=TRUE))\n y = as.numeric(grep('y([0-9]+)',file,match=TRUE,value=TRUE))\n s = load.csv(parameter.dir+'/'+file,sep=',',auto.detect=FALSE)\n s = s[[1]] # s[,1]\n s = s[parameter.cut:length(s)]\n field = grep('signal-([A-Za-z]+).',file,value=TRUE,match=TRUE)\n data=rbind(data,{x=x,y=y,field=field,data=s})\n}\ndata.0=data\ndata=shuffle(data)\nlogg(typeof(data))\nlogg(fivenum(data[1,\"data\"]))\nlogg(summary(data))"},{"options":{"eval":"_PxEnUf_ZnVuY3Rpb24gKHRleHQsZW52KSB7CiAgICAgICAgICAgICAgICAganNTY29wZS5ydW4odGV4dCxlbnYpCiAgICAgICAgICAgICAgICB9","mode":"r","evalUser":"RRun","overlay":1,"label":"Load Compact Data","heightC":30,"heightE":30,"collapsed":false},"code":"parameter { dir:'data2', cut:40, length:99 }\nuse math,csv,file\nfile = parameter.dir+\"/data_uniform.csv\"\ndata1 = read.csv(file)\ndata = data.frame(x=NA,y=NA,data=NA)\nfor (i in 1:nrow(data1)) {\n s = as.vector(data1[[i,parameter.cut:parameter.length]])\n x = data1[i,100]*500\n y = data1[i,101]*500\n data = rbind(data,{x=x,y=y,data=s})\n}\ndata=shuffle(data)\nlogg(typeof(data))\nlogg(fivenum(data[1,\"data\"]))\nlogg(summary(data))"},{"options":{"eval":"_PxEnUf_ZnVuY3Rpb24gKHRleHQsZW52KSB7CiAgICAgICAgICAgICAgICAganNTY29wZS5ydW4odGV4dCxlbnYpCiAgICAgICAgICAgICAgICB9","mode":"r","evalUser":"RRun","overlay":1,"label":"Plot Signal(s)","heightC":30,"heightE":30,"collapsed":false},"code":"parameter { index1:1, index2:2 }\nuse plot\nsample.1 = data.0[parameter.index1,]\nsample.2 = data.0[parameter.index2,]\ndev.new(height=400)\nplot({sample.1$data, sample.2$data},type='l',\n main=sample.1$field+' x'+sample.1$x+'-y'+sample.1$y+' / '+\n sample.2$field+' x'+sample.2$x+'-y'+sample.2$y)"},{"options":{"eval":"_PxEnUf_ZnVuY3Rpb24gKHRleHQsZW52KSB7CiAgICAgICAgICAgICAgICAganNTY29wZS5ydW4odGV4dCxlbnYpCiAgICAgICAgICAgICAgICB9","mode":"r","evalUser":"RRun","overlay":1,"label":"Data Preparation","heightC":30,"heightE":30,"collapsed":false},"code"
|
