powered by
ChenHsu.bin(table, n.subset)
a<-fuzzy.ts1(lh,type="Chen-Hsu",plot=1) b<-ChenHsu.bin(a$table1,n.subset=c(1,2,1,1,1)) fuzzy.ts1(lh,type="Chen-Hsu",bin=b,plot=1,trace=1)
Run the code above in your browser using DataLab