Description Usage Arguments Value Author(s) References See Also Examples
Calculating fuzziness of time series with Chen (1996), Singh (2008), Heuristic (Huarng 2001) and Chen-Hsu (2004) models.
1 2 |
ts |
Univariate time series. |
n |
Number of fuzzy set. |
D1,D2 |
Two proper positive numbers. |
type |
Type of model. |
bin |
Point-bin values use to divide fuzzy stes for Chen-Hsu model. If bin=NULL (default) then function just inform information about fuzzy sets. |
trace |
Let trace=TRUE to print all of calculation results out to creen. Let trace=FALSE (default) to only print fuzzy series out to creen. |
plot |
Let plot=TRUE to paint graph of obsevation series and fuzzy series. Let plot=FLASE (default) to do not paint graph. |
grid |
If TRUE, a gray background grid is put on the graph. |
When trace = TRUE, results are returned as a list containing the following components.
type |
Name of fuzzy model. |
table1 |
Information about fuzzy sets. |
table2 |
Information about fuzzy series of Chen, Sing, Heuristic and Chen-Hsu models (in bin!=NUL). |
accuracy |
Information about the criterion to evaluate forecasting model. |
When trace = FALSE, results is a time series fitted by fuzzy time series model.
Doan Hai Nghi <Hainghi1426262609121094@gmail.com>
Tran Thi Ngoc Han <tranthingochan01011994@gmail.com>
Hong Viet Minh <hongvietminh@gmail.com>
Chen, S.M., 1996. Forecasting enrollments based on fuzzy time series. Fuzzy Sets and Systems. 81: 311-319.
Chen, S.M. and Hsu, C.C., 2004. A New method to forecast enrollments using fuzzy time series. International Journal of Applied Science and Engineering, 12: 234-244.
Huarng, H., 2001. Huarng models of fuzzy time series for forecasting. Fuzzy Sets and Systems. 123: 369-386.
Singh, S.R., 2008. A computational method of forecasting based on fuzzy time series. Mathematics and Computers in Simulation. 79: 539-554
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | #Print all of calculation results out to creen.
#par(mfrow=c(2,2))
#data(enrollment)
#fuzzy.ts1(enrollment,n=7,type="Chen",plot=TRUE,grid=TRUE)
#fuzzy.ts1(enrollment,n=7,type="Singh",plot=TRUE)
#fuzzy.ts1(enrollment,n=7,type="Heuristic",plot=TRUE,grid=TRUE)
#Only print fuzzy series out to creen.
#chen10<-fuzzy.ts1(lh,n=10,type="Chen")
#singh10<-fuzzy.ts1(lh,n=10,type="Singh")
#heuristic10<-fuzzy.ts1(lh,n=10,type="Heuristic")
#Useing ChenHsu.bin function to find divide point fuzzy set values.
#a<-fuzzy.ts1(lh,n=5,type="Chen-Hsu",plot=1)
#b<-ChenHsu.bin(a$table1,n.subset=c(1,2,1,1,1))
#chenhsu6<-fuzzy.ts1(lh,type="Chen-Hsu",bin=b,plot=1,trace=1)
|
Loading required package: MASS
Loading required package: TSA
Attaching package: 'TSA'
The following objects are masked from 'package:stats':
acf, arima
The following object is masked from 'package:utils':
tar
Loading required package: TTR
Loading required package: tseries
Loading required package: urca
Attaching package: 'AnalyzeTS'
The following object is masked from 'package:base':
pmax
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.