- 在线时间
- 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() #四舍五入
* X) W1 ~8 S/ e例:x <- c(3.1416, 15.377, 269.7)
+ U# F) N3 C3 hround(x, 0) #保留整数位 c+ D9 p( I( L) b% A. t. ^
round(x, 2) #保留两位小数% b4 h5 l! g4 @1 L& Q9 C5 y
round(x, -1) #保留到十位
8 m {9 |0 v5 D) Q4 k
* [( j. e- s1 ?* d( m2、signif() #取有效数字(跟学过的有效数字不是一个意思)
: @* T8 h& \- i! b: a! j例:略8 I* e3 g4 Z2 U7 Y7 Q0 {. H( r
; t% z& K* }) U3、trunc() #取整
9 m8 w5 ~( I1 B6 D floor() #向下取整( i& Z, }, Y; @ n4 A' H! w! C
ceiling() #向上取整
, ~' `* K) C# x+ [! G3 T) `4 b例:xx <- c(3.60, 12.47, -3.60, -12.47)* X6 l. N- \2 O8 e6 g2 u* ]
trunc(xx)) l$ V+ ]# y) [: R8 t
floor(xx)
) ]* w$ k% u5 L9 n, U2 U/ \! dceiling(xx)
( K( n# ^$ c. N4 E/ D" i7 Z `1 r# @( J& }# x
4、logb(a, b) #以b为底的对数,省略b表示自然对数% `/ F6 z* i: c. J% \4 b7 k
log() #自然对数
$ j3 g7 E/ T1 T log10() #以10为底的常用对数
6 V3 w5 `4 [) u例:logb(8, 2)8 T; I7 _% t4 k" Z1 ~6 j
log(8); logb(8)* n& }) T& r8 ]
log10(100); logb(100, 10)
. p* h) z0 M7 z; a. A, r
- z) { V' J3 h% Y {' O' R$ l5、sqrt() #平方根6 _; f% R$ l) b7 _& }0 |3 O7 u
exp() #指数2 r& c# o7 g2 m' V2 D* a: N# M
& E/ F! }7 i; A4 G: w; g
6、sin() #正弦$ p& \- r3 U2 o7 G! Z e
cos() #余弦- c( O" {+ a5 |2 v# P; X l
tan() #正切2 f( y9 q6 ?/ X
asin() #反正弦6 F8 h3 p) W0 H
acos() #反余弦+ K: z6 A0 D# D4 H1 }: R
atan() #反正切
4 l% O- d8 n9 j/ M/ {0 C9 t9 ? sinh() #双曲正弦3 e) x# B% D( o, n/ j
tanh() #双曲正切
4 C0 R0 k2 |/ B# [
& H) x* c# a d# ~! a+ O7、nchar() #字符长度
! p! W/ U: P' f; f* }0 S% x例:xx <- 'China is a great country'
0 F9 X ? l6 g3 Pnchar(xx)
! p. A9 Y+ o% V S$ k% i4 m2 _6 | d1 Q, u
8、substring() #取子字符串
/ r+ \7 s8 y, r( l% W( M例:substring(xx, 1, 5), l/ S6 n4 e9 ], A. F6 R" |
2 Y! C" G0 _+ D3 t; I/ [, ^9、paste() #连接字符
- }7 }$ ^+ v# v/ h: H2 [! T语法是:paste(..., sep = " ", collapse = NULL)
! e6 e6 d) Z) K/ Q U+ P& |1 H/ o- b例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'
2 C K) J5 H3 j) s9 |9 ]9 g. m# ]paste(x, y, z, d); P& o1 b" A$ Y
例2:paste(c('x', 'y'), 1:4, sep = '') j& ` V. i w
例3:paste('x', 1:4, sep = '', collapse = '+')1 V/ ~! {$ C4 A! E$ [/ }8 E2 ^5 P
* v7 X. z1 y3 _8 Y: T8 ]2 p |
zan
|