- 在线时间
- 27 小时
- 最后登录
- 2013-5-20
- 注册时间
- 2012-11-2
- 听众数
- 15
- 收听数
- 1
- 能力
- 0 分
- 体力
- 3870 点
- 威望
- 0 点
- 阅读权限
- 60
- 积分
- 1335
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 347
- 主题
- 320
- 精华
- 0
- 分享
- 0
- 好友
- 6
升级   33.5% TA的每日心情 | 奋斗 2013-6-15 16:58 |
---|
签到天数: 24 天 [LV.4]偶尔看看III
 群组: 第四届数学中国美赛实 |
R语言入门基础教程:常用运算函数。对一般数据进行运算的常用函数: 1、round() #四舍五入( ]# f; R7 f, h7 J ]
例:x <- c(3.1416, 15.377, 269.7)
% V# O7 q7 P) i! rround(x, 0) #保留整数位% [& V# ]0 ]# c3 @' b5 y
round(x, 2) #保留两位小数
+ T% {. o# p! @; oround(x, -1) #保留到十位
3 n4 ^& D8 N' Q+ ^) V2 w1 \" D' Y; s: s! p2 \
2、signif() #取有效数字(跟学过的有效数字不是一个意思): ^- u; w7 C0 N* V
例:略
P' H$ M1 M* X2 y4 d" C
' G1 S1 @' _4 g, @3、trunc() #取整
- i3 I' v; {: n9 o) N floor() #向下取整& ]' l. F# A8 T( v; v
ceiling() #向上取整
2 S+ G$ D' `3 X" D例:xx <- c(3.60, 12.47, -3.60, -12.47)* w1 l4 |5 {$ d8 Q. U& S# t( N2 t- |
trunc(xx). a- `7 A1 _! R$ |
floor(xx)
5 J- k. d& ]! f3 f4 \ceiling(xx)
& t5 z% |0 z2 z) z# P5 T" M2 I8 e
3 }% a( V$ p, V% P2 ^# h: N4、logb(a, b) #以b为底的对数,省略b表示自然对数
( `" |' I J& m; I3 m' I log() #自然对数
! A V# E& |, n0 M3 Q: Z. Y G; k( L log10() #以10为底的常用对数* {1 A* [+ c% I/ `1 v) g
例:logb(8, 2)1 r( ~9 k) A0 P( P- S1 G
log(8); logb(8)
! n j3 C* \2 Q1 P! q% ilog10(100); logb(100, 10)
( x( c* N: G% g9 I( u2 I W
8 ]' `( w8 }# |2 D1 `8 C; d S$ s5、sqrt() #平方根
; n' h: \" K3 L) \# i) @ exp() #指数6 _% z( q- H# B9 ]* ^* i( ?
/ [" B2 ]; \* b
6、sin() #正弦
1 s$ P) ^8 n" C5 m% U P1 o3 r cos() #余弦6 _* S; W+ l& w% f
tan() #正切2 @5 K% ^0 V& h* f4 P
asin() #反正弦
- _& c/ u; v/ b6 L' ~0 l4 N acos() #反余弦
2 O' Q4 ?( _+ A" z: ?' g atan() #反正切
; U. p9 G. G8 b$ E- c sinh() #双曲正弦
! e# s' o# V+ V4 L4 _& g1 J tanh() #双曲正切4 ^* l) \0 R- v& p0 ~
( ^+ U# v2 I! g2 A+ V) f) f9 X) T
7、nchar() #字符长度
1 M0 J8 t* c8 }例:xx <- 'China is a great country'
1 J9 T' S+ w3 v& c$ k. m) @3 gnchar(xx)
7 b& P8 E* E7 z' o
( C8 N4 n3 d" U: f. I8 {* J; z* N8、substring() #取子字符串
/ L- _9 q$ N5 a9 c) c0 w* W例:substring(xx, 1, 5)
: c- _9 ^, ^4 |. O) X* J% A: ~) }' b" [1 h0 V# w" C
9、paste() #连接字符0 X% ~( n# e8 }
语法是:paste(..., sep = " ", collapse = NULL)
( V4 U" c8 x6 C. A2 v8 Q. |' y例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student', V) m7 Q0 u9 {( b+ _! \0 x9 j
paste(x, y, z, d)/ U' [5 V& ~' W
例2:paste(c('x', 'y'), 1:4, sep = '')
0 u* s3 Z& O0 F; o" G8 S) e! y例3:paste('x', 1:4, sep = '', collapse = '+'); I( @* b3 C; w! y) P) T
0 C3 {+ E" v) k5 V
|
zan
|