- 在线时间
- 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() #四舍五入+ H# l- U. h/ }3 V* K5 ]
例:x <- c(3.1416, 15.377, 269.7)
4 p |) [$ _ _0 G& mround(x, 0) #保留整数位! u: s4 Z6 g( x4 r' H
round(x, 2) #保留两位小数$ T' P+ w: n ]$ r
round(x, -1) #保留到十位0 h' p: @. V; u3 {/ P; F* j! W1 Y
3 [1 w5 T" `* K7 K
2、signif() #取有效数字(跟学过的有效数字不是一个意思)
' f; V6 ?1 `/ @$ |6 F: N例:略
% O O) h0 U$ @! k) ^% v% P6 r' t
+ K2 h& l- Y2 j7 n- \* J6 k6 `3、trunc() #取整$ p5 C4 ~& P) I' w e5 t
floor() #向下取整6 M* X! s0 _- ]8 @
ceiling() #向上取整7 m9 ^$ e V( g( d; E- S! j
例:xx <- c(3.60, 12.47, -3.60, -12.47)
2 ~) _3 b; T2 W) v, H, gtrunc(xx)
* F7 e/ I8 m6 V# h# ^' jfloor(xx)+ I* B1 S' R; Y+ b5 m1 h
ceiling(xx)3 Y4 Y7 L0 n- d* u% Q, |7 }
5 L+ W" L: V7 e( r9 m3 r
4、logb(a, b) #以b为底的对数,省略b表示自然对数
4 U% ^2 u6 C( m) R7 h log() #自然对数0 r0 v+ y3 h, V" c7 i# p+ k1 v
log10() #以10为底的常用对数0 a- ^- f8 p( g
例:logb(8, 2)
3 ^+ j1 y4 z$ W, dlog(8); logb(8)
; n, |- f% {% k9 s: K. S9 ~6 _log10(100); logb(100, 10); R$ i1 B3 I: `; |
, J- _. x6 \2 f$ b2 ~5、sqrt() #平方根
( ?! U4 ^0 n& N( S9 [ exp() #指数" Q$ w7 p# s1 J2 N: F9 ?0 J$ Q
9 G; h, i* y! O) ]6 ~6、sin() #正弦
( y2 Z4 Q0 s) F7 u cos() #余弦4 B3 F2 A, S6 r+ ` d* x7 A0 X8 d
tan() #正切
1 H2 D4 I/ M9 f- I asin() #反正弦1 M4 L; v+ i1 ?9 j6 T
acos() #反余弦0 U- W7 g6 h+ r; ?* r0 u8 B$ |' U
atan() #反正切
: ^: u( L" d! Q+ v9 [/ g+ T5 x' g sinh() #双曲正弦
% R# Y5 F4 F4 g8 ^) ^5 F8 O( |. Y tanh() #双曲正切. _( L9 S8 J& S0 ?) Q
+ L$ g4 X5 Y5 ^7、nchar() #字符长度& I# c+ l* R4 i/ @7 y. z/ P8 d
例:xx <- 'China is a great country', `* Q* w! N+ w
nchar(xx)
3 u9 g9 V( [9 K7 ]- p( o0 j! ~( C! U; T# b& T. |8 R
8、substring() #取子字符串) w3 {6 `! f h. }$ T' p
例:substring(xx, 1, 5)1 p, ^3 [* v) i) d! f# J
$ m h* ~) ~! @+ e9、paste() #连接字符
( \9 M5 \( |- {2 _9 k语法是:paste(..., sep = " ", collapse = NULL)2 w5 b7 `! M0 x2 c* k
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'6 N" Y& |, H4 G& \; ]
paste(x, y, z, d)/ c' k# o3 G8 n) k6 [+ n; F
例2:paste(c('x', 'y'), 1:4, sep = '')' ?7 X- j3 _4 n; }
例3:paste('x', 1:4, sep = '', collapse = '+')
+ f: ]8 ~7 a8 v9 Y/ |
2 @0 P9 s" W w3 r9 e |
zan
|