- 在线时间
- 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() #四舍五入
# b5 w! ^/ y5 i5 }; m ]7 Z例:x <- c(3.1416, 15.377, 269.7)
7 v/ J* [) _1 j6 M( rround(x, 0) #保留整数位
; \6 L. p9 x- mround(x, 2) #保留两位小数
7 k9 N" w9 J* Q: d# Rround(x, -1) #保留到十位) p9 l5 A( n& A7 f
8 s& L" y8 l5 k6 @: l+ V
2、signif() #取有效数字(跟学过的有效数字不是一个意思)
3 X$ Y# U3 y. t* t: y4 a例:略9 c. R: r8 Y* O0 ?5 r
4 V6 \% g; u" Z. E+ o3、trunc() #取整
9 f. m- o% m# B+ b floor() #向下取整
0 J- t- p: U, t5 ]% H* ^ ceiling() #向上取整
' m' b* t* [- z1 L. M: }+ p1 }" |& S例:xx <- c(3.60, 12.47, -3.60, -12.47)4 @5 u5 \$ J8 p% }+ `3 e
trunc(xx)
, w- ~- C. w3 A- l. Bfloor(xx)
: m3 f- T f# i. W" Y8 Eceiling(xx)
9 P+ L) V3 ~4 p6 B+ u
B& x3 s6 M! s0 t7 L: p/ w4、logb(a, b) #以b为底的对数,省略b表示自然对数
5 S0 h. |8 K |9 J7 N! B, u log() #自然对数 G3 O5 v- e: f# o/ @
log10() #以10为底的常用对数$ F% J, e+ R* Z% s
例:logb(8, 2)$ F- Y9 q1 ?" j( c' N
log(8); logb(8)
0 `; I7 z5 q4 x9 Z- b$ T1 o5 M0 d* W& |log10(100); logb(100, 10)# s I h- L, Y3 h3 z3 ~9 s7 o
9 Y' R7 Y% Y4 K* k
5、sqrt() #平方根+ \ x- v3 ^) _/ L
exp() #指数3 c) N" |: a. d3 D- l- U
$ D. G4 E6 B, r- e6、sin() #正弦
: b+ Y) P* D% i* u; L6 A8 P) [1 B6 v cos() #余弦
4 u# R. x$ R" I* Z% D, F8 w) P+ K tan() #正切. R7 k, x( y! F' I
asin() #反正弦: V% C; H( K; X* Z8 }' T
acos() #反余弦
1 i' [9 t7 K( f$ x ^6 o, `, H* T atan() #反正切
! a# T( J5 M/ j) N sinh() #双曲正弦
! C) P0 \7 ^( P: K4 a6 a* L& _ tanh() #双曲正切
) z/ ?/ D, I* A! ?# @; ^( C! B4 V+ v9 M3 ]$ V: o! h9 x8 g
7、nchar() #字符长度' t* l" \; G# n' z
例:xx <- 'China is a great country') H6 B6 E1 O0 b) r b# N6 `9 G
nchar(xx)
; l. n& b3 z9 Q! p0 j9 r
8 l8 ^8 L: r! }: \2 X: {8、substring() #取子字符串
7 x( ~6 q1 P% s2 }, N" W例:substring(xx, 1, 5)' V; V# Y* E* m2 ^
9 K' U9 N. h% |2 r9、paste() #连接字符
o X4 W' b& X0 g: n1 E3 n语法是:paste(..., sep = " ", collapse = NULL)% n& T$ ?2 q" B9 f! S. y
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'
; W6 g9 [! V! C5 p0 q+ gpaste(x, y, z, d)
3 }' |1 P8 }+ n4 L. S0 r" a" x, M例2:paste(c('x', 'y'), 1:4, sep = '')* w$ D) ]# n) _3 w2 W' c* X/ I8 L/ X
例3:paste('x', 1:4, sep = '', collapse = '+')
t; s8 P: g+ f4 \0 r( D' y2 i2 [" h/ i+ _
|
zan
|