updated

7 files changed, 0 insertions, 28 deletions

diff --git a/R/myCode/plots/rbsPlot.png b/R/myCode/plots/rbsPlot.png
deleted file mode 100644
index f696501..0000000
--- a/R/myCode/plots/rbsPlot.png
+++ /dev/null
diff --git a/R/myCode/plots/rgsPlot.png b/R/myCode/plots/rgsPlot.png
deleted file mode 100644
index 8fb1c24..0000000
--- a/R/myCode/plots/rgsPlot.png
+++ /dev/null
diff --git a/R/myCode/rbs1.R b/R/myCode/rbs1.R
deleted file mode 100644
index 6d6d3a5..0000000
--- a/R/myCode/rbs1.R
+++ /dev/null
@@ -1,11 +0,0 @@
-gen.rbs<-function(n,band,levels){
-  require(signal)
-  v<-rnorm(n)
-  
-   v<-sapply(v, function(x) {if(x==0) rnorm(1) else x}, simplify = 'vector')
-  #if we do not specify else case, it assigns it as NULL
-  bfilt<-butter(8,band,type = 'pass',plane = 'z')
-  v1<-filter(bfilt,v)
-   v1<-sapply(v1, function(x) {if(x>0) levels[2] else levels[1]})
-     return(v1)
-}
\ No newline at end of file
diff --git a/R/myCode/rgs1.R b/R/myCode/rgs1.R
deleted file mode 100644
index cf4855b..0000000
--- a/R/myCode/rgs1.R
+++ /dev/null
@@ -1,10 +0,0 @@
-gen.rgs<-function(n,band,levels){
-  require(signal)
-  mu<-(levels[1]+levels[2])/2
-  sigma<-(levels[2]-levels[1])/2
-  v<-rnorm(n,mu,sigma)
-  v<-sapply(v, function(x) {if(x==0) rnorm(1) else x})
-  gfilt<-butter(8,band,type ='pass',plane ='z')
-  v1<-filter(gfilt,v)
-  return(v1)
-}
\ No newline at end of file
diff --git a/R/myCode/test.R b/R/myCode/test.R
deleted file mode 100644
index e69de29..0000000
--- a/R/myCode/test.R
+++ /dev/null
diff --git a/R/myCode/testCases.docx b/R/myCode/testCases.docx
deleted file mode 100644
index 1324173..0000000
--- a/R/myCode/testCases.docx
+++ /dev/null
diff --git a/R/test/test.R b/R/test/test.R
deleted file mode 100644
index 8a710dd..0000000
--- a/R/test/test.R
+++ /dev/null
@@ -1,7 +0,0 @@
-m<-idpoly(A=c(1,-1.5,0.7),B=c(1,0.5),ioDelay=1)
-u<-rnorm(1000)
-y<-sim(m,u,sigma=0.1)
-z<-idframe(y,u)
-outputNames(z)<-"y"
-inputNames(z)<-"u"
-plot(z)
\ No newline at end of file