- 在线时间
- 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() #四舍五入8 }2 L" W; G: [4 X) |. i) j; h8 O
例:x <- c(3.1416, 15.377, 269.7)
' ~, q4 ~$ z% O; }! ?# Yround(x, 0) #保留整数位+ U( {4 E& j: j- v( u( U* n% r6 D& L
round(x, 2) #保留两位小数
( g0 e( M- g8 b" m' K* Yround(x, -1) #保留到十位
" P, {# A+ ^+ G1 q, m" G. c. }: t- m. g7 n. L. |. T
2、signif() #取有效数字(跟学过的有效数字不是一个意思)4 ?6 `: P# _) s7 p2 c1 W0 z! H! q6 X; z0 d
例:略
r9 g& _* z4 g5 D" b# g* Z6 V+ `& K% a! N2 i+ p2 J o
3、trunc() #取整$ N3 | S. g u4 J& v' ^4 v# Q
floor() #向下取整1 i$ r8 T {3 V7 g) w/ }9 p& m
ceiling() #向上取整* A3 g M; \. d' z& ~
例:xx <- c(3.60, 12.47, -3.60, -12.47)* V( ]3 Z' ~: d5 }
trunc(xx)0 }, Y* z, T: _0 ?7 ~' M' }
floor(xx) D$ |( E" \; G: E9 N6 N& f- \
ceiling(xx)
' b0 a7 y$ r( ^$ C& G4 a$ T9 A. ?! H& z1 p# l. [# w0 m- p! s
4、logb(a, b) #以b为底的对数,省略b表示自然对数$ ~( H( ^. l# R+ r" V" M: i/ ]$ e
log() #自然对数. D# v8 Q! E* K/ f5 @3 | H1 b
log10() #以10为底的常用对数5 ?9 i# ]4 Q: t/ l5 g; V! y. u, }
例:logb(8, 2)
$ I' n8 d' B5 F8 Wlog(8); logb(8)
0 F) ~3 J% z4 G7 Y/ Ylog10(100); logb(100, 10)& ]& g0 |2 Q) y7 ]" O" g) l
2 ^6 R9 S$ [% k- x+ s" P, e& Z
5、sqrt() #平方根( {3 i! q7 s! |! f! s2 Q$ P
exp() #指数
- t: L0 M J9 U# Q/ z @7 s: y1 y( O, c, U" h% m5 s
6、sin() #正弦+ A1 s2 L# t9 r$ n- e! F0 ~
cos() #余弦
. h- u7 b' g8 M/ T3 o, N tan() #正切, X$ d3 d4 g$ Y2 T* X: B
asin() #反正弦, A6 B) l* o8 y6 m. J
acos() #反余弦
0 w6 `3 i, i7 b atan() #反正切9 ?# I$ i2 C+ D# ~3 c- \. `
sinh() #双曲正弦
, T, t9 d, n6 Z0 y' v tanh() #双曲正切
- D: Z/ k$ I( D+ I6 ?) Y6 b7 A$ x5 C- E* E
7、nchar() #字符长度# f. }" _; t4 Q" _" G8 L' U9 ?: C
例:xx <- 'China is a great country'( ~( H/ ^; M" y5 a0 Z9 d
nchar(xx)
/ t" b# i" p2 ]! a
( e- w+ {6 D. P5 I8、substring() #取子字符串
8 t& `9 O4 Z: {/ m; C2 q例:substring(xx, 1, 5)
+ s% _' c7 R% L3 _9 R1 l; Y, d ^8 M/ W, `, X2 D* ~7 y" c8 Y, Y
9、paste() #连接字符/ f- p" m: n- p' g
语法是:paste(..., sep = " ", collapse = NULL)- w) }, |; X2 s/ X/ F
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'; o4 |. z& y, F1 W0 e" r9 n& a
paste(x, y, z, d)
$ [* h9 Q0 F% [& `$ q2 J( h9 V6 ]9 N例2:paste(c('x', 'y'), 1:4, sep = '')
+ ~- C! F, _" U8 O+ k2 E0 X' ]例3:paste('x', 1:4, sep = '', collapse = '+')
6 k% C/ @) k/ x
( F8 w+ i# `; i; O/ V9 [ |
zan
|