The R Project SVN R

Rev

Rev 51764 | Rev 52733 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 51764 Rev 51765
Line 793... Line 793...
793 
> od <- options(digits=5)
 793 
> od <- options(digits=5)
794 
> ## End Don't show
 794 
> ## End Don't show
795 
> require(stats); require(graphics)
 795 
> require(stats); require(graphics)
796 
> JJ <- log10(JohnsonJohnson)
 796 
> JJ <- log10(JohnsonJohnson)
797 
> plot(JJ)
 797 
> plot(JJ)
- 
 
 798 
> ## This example gives a possible-non-convergence warning on some
- 
 
 799 
> ## platforms, but does seem to converge on x86 Linux and Windows.
798 
> (fit <- StructTS(JJ, type="BSM"))
 800 
> (fit <- StructTS(JJ, type="BSM"))
799 
 
 801 
 
800 
Call:
 802 
Call:
801 
StructTS(x = JJ, type = "BSM")
 803 
StructTS(x = JJ, type = "BSM")
802 
 
 804