Arithmatic Operations and built-in functions in S-plus:
> prod(x)
[1] 6
> p<-(12/(2+6)**4)-(((6-1)*5)^3)
> p
[1] -15625
> print(p) # [Same command as “p” only]
[1] -15625
> summary(x)
Min. 1st Qu. Median Mean 3rd Qu. Max.
1 1.5 2 2 2.5 3
> summary(y)
Min. 1st Qu. Median Mean 3rd Qu. Max.
1 1.75 2.5 2.5 3.25 4
> summary (x[x==y])
Min. 1st Qu. Median Mean 3rd Qu. Max.
1 1.5 2 2 2.5 3
Warning messages:
Length of longer object is not a multiple of the length of the shorter object
in: x == y
> length(y)
[1] 4
> sum(y)
[1] 10
> max(y)
[1] 4
> min(y)
[1] 1
> mean(y)
[1] 2.5
> sqrt(y)
[1] 1.000000 1.414214 1.732051 2.000000
> e_sqrt(y)
> sort(e)
[1] 1.000000 1.414214 1.732051 2.000000
> mode(e)
[1] "numeric"
> mode(p)
[1] "numeric"
> rr<-numeric()
> rr
numeric(0)
> mode(rr)
[1] "numeric"
> f<-c(8,-3,6,2,-6,3,-9,2,-6,2)
> abs(f)
[1] 8 3 6 2 6 3 9 2 6 2
> sort(f)
[1] -9 -6 -6 -3 2 2 2 3 6 8
> order(f,x)
[1] 7 5 9 2 4 10 8 6 3 1
> sin(f)
[1] 0.9893582 -0.1411200 -0.2794155 0.9092974 0.2794155 0.1411200
-0.4121185 0.9092974 0.2794155
[10] 0.9092974
> floor(sin(f)) # [ Look ! I’m sick of instructing
about all the commands, just gimme a break!! Why don’t you try “help(floor)” to
know what its functionality is; would you ? Same goes for the rest of the
Document :p]
[1] 0 -1 -1 0 0 0 -1 0 0 0
> trunc(sin(f))
[1] 0 0 0 0 0 0 0 0 0 0
> ceiling(sin(f))
[1] 1 0 0 1 1 1 0 1 1 1
> round(sin(f))
[1] 1 0 0 1 0 0 0 1 0 1
> quantile(x,seq(.1,.9,.1))
10% 20% 30% 40% 50% 60% 70% 80% 90%
2.9 4.8 6.7 8.6 10.5 12.4 14.3 16.2 18.1
> quantile(x,.77)
77%
15.63
> quantile(x,c(.25,.75))
25% 75%
5.75 15.25
