- 在线时间
- 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() #四舍五入
' C7 X; ?% Q1 p5 Z6 y例:x <- c(3.1416, 15.377, 269.7)
3 v& K- C' d5 X; N/ n) {round(x, 0) #保留整数位
8 {) x7 ]+ }6 r$ f, [( |round(x, 2) #保留两位小数
1 F m3 K* v) l* xround(x, -1) #保留到十位
7 V% N- i, R! p; d* M' c3 y
4 E& j+ }& ]3 e- [, S2、signif() #取有效数字(跟学过的有效数字不是一个意思) B: f+ @. C1 d3 b
例:略
5 C) Q/ ]8 ]/ s( P- f3 D2 N5 B% E5 y6 R/ k+ V
3、trunc() #取整5 O% r: ]- ]5 Y2 L
floor() #向下取整% f9 _$ u7 g, h7 m! k
ceiling() #向上取整+ @9 o& {0 x: k. n- Y- g
例:xx <- c(3.60, 12.47, -3.60, -12.47)1 g' D3 b; ~/ t4 X& o3 ]
trunc(xx): C7 p6 O3 _8 k" X! k7 @$ Y; @
floor(xx)) ^. q6 R+ X$ n
ceiling(xx)! y( \3 _( l4 R% h$ R+ m% K2 s
7 D* ^: P6 t/ w8 e
4、logb(a, b) #以b为底的对数,省略b表示自然对数. k: K9 x8 t0 C8 X
log() #自然对数5 M, `% O8 k. _ b9 M2 J# z0 U9 Q
log10() #以10为底的常用对数$ \* o: z, n6 _4 y; ~
例:logb(8, 2)
# x$ i! _4 J. _, Rlog(8); logb(8)! c& |& k4 n5 J+ V
log10(100); logb(100, 10)
1 B- ]; \7 n/ ]3 h4 L- g1 `1 a" s% L2 x( z
5、sqrt() #平方根
; ~3 x* m1 u! u exp() #指数
% p3 S, H) m2 e' ^4 o- _) ? e) j) g$ Z+ ~
6、sin() #正弦
, q2 ^/ K) H! e" a) Y cos() #余弦4 x1 T: I" w0 P9 q1 W: J$ T
tan() #正切2 l) A& T' ~$ e6 @8 j3 i/ n
asin() #反正弦
& S6 j& Z; P) h0 a acos() #反余弦- J3 X$ G$ Z' o
atan() #反正切
! t6 W* G( ^5 e8 E' l1 g% R sinh() #双曲正弦* m! a; q+ V- s) T
tanh() #双曲正切' \. D6 w+ S% Z7 ]; _2 Y
* a$ b: w4 f2 K& Z0 m3 `3 ~
7、nchar() #字符长度
1 W2 U, E1 _- ]8 Q3 i7 }) {例:xx <- 'China is a great country'* ~3 t0 t8 w" Y" P0 e
nchar(xx)
* I7 p* g. i5 S
, I" ?8 O# l" E5 J3 A+ t# R8、substring() #取子字符串1 R* U% j, [* d
例:substring(xx, 1, 5)
. E. c ^; _' B2 Y2 Q C7 P. y; @& k5 K5 D5 t& Z
9、paste() #连接字符; i& G, n/ G, _" g) o |- o! T
语法是:paste(..., sep = " ", collapse = NULL)
% y! H, g+ H; W' Z w例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'
9 b" v7 k& C4 npaste(x, y, z, d)3 c9 `& ~1 W! S+ `" N' b, S
例2:paste(c('x', 'y'), 1:4, sep = '')% a% [, D o7 t( ]
例3:paste('x', 1:4, sep = '', collapse = '+')# p# Q M& r& s9 A+ M1 f
- R0 w w) J% C- L
|
zan
|