- 在线时间
- 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() #四舍五入, l3 C- t* U/ D! K2 k& R6 w& i
例:x <- c(3.1416, 15.377, 269.7)# G1 \& ?4 z4 r8 \3 z( z
round(x, 0) #保留整数位1 n/ `4 J" A* S. c0 c' ?" j# Z
round(x, 2) #保留两位小数, Z( T4 Z; }! j( k% O
round(x, -1) #保留到十位
. @. v# V% G8 n! k( |) |4 N' b# q9 b7 s4 _
2、signif() #取有效数字(跟学过的有效数字不是一个意思)8 b: T, a3 R! D' l+ n4 [
例:略+ Z6 k- E, r, u0 m' P, L$ U
( F! \( m* K! _) O7 C$ I) b* ^3、trunc() #取整
9 w8 C" G8 j9 G! H$ e: a2 ?2 [ floor() #向下取整7 ?. `% L/ V2 E( I0 w- j
ceiling() #向上取整$ p& N+ M; ~% c9 K3 r; M/ n
例:xx <- c(3.60, 12.47, -3.60, -12.47)% W& ]4 |* x- b; j
trunc(xx)
. O) _& g9 b: zfloor(xx); W0 r- A& u& @- I
ceiling(xx)
5 F! X* \& y) I
7 T9 `8 ~% E w4 E* b2 \; e4、logb(a, b) #以b为底的对数,省略b表示自然对数
+ F3 S4 D, C7 l log() #自然对数. n; ]: l y3 y$ h! T# K
log10() #以10为底的常用对数
5 x: @$ H. R8 t( V# V9 T$ O例:logb(8, 2)
6 p/ b) ?5 h) b' P% F% olog(8); logb(8)! @' \$ ? k% s& S
log10(100); logb(100, 10)
! f. R; z3 T* G1 n
. v) Q5 w* e& U% v$ U+ |: w5、sqrt() #平方根
7 ?# f& t0 Y4 w/ S' u; C exp() #指数3 e R$ J7 k. w7 O8 \5 J+ y3 a8 J P. u
# I- x7 T8 B3 J$ t6、sin() #正弦
" l" j8 ^( l2 P9 y% p7 a" \7 o cos() #余弦
$ G/ x* J0 F" m. Z) |+ I tan() #正切* ~1 o5 C3 y9 d; o% e% _7 |7 f/ A
asin() #反正弦( o! a. n9 [7 t. K3 d0 [! r; |/ W6 t
acos() #反余弦2 I P; P6 L1 E5 l6 H& s
atan() #反正切7 R0 r8 o5 O" N2 `9 S7 l8 S
sinh() #双曲正弦
, ]' Q- ?/ ?9 U tanh() #双曲正切
# k% J+ i7 D, F% g: x
; M! D( T; R! t- {# C+ g4 ^0 ^& J7、nchar() #字符长度
# w5 H7 }2 ^# {* B% W6 B5 f! M例:xx <- 'China is a great country'
$ Y& E( s1 n j3 I2 ]) n: Knchar(xx)' L3 i* u, i4 p: A# d( o6 X2 i
& z; W7 |9 K2 Q( V% k% H2 f* u8、substring() #取子字符串/ V" k$ M" M# e v
例:substring(xx, 1, 5)
) v) f7 [, k4 ]( G
0 O" H/ B; A2 s0 d: O9、paste() #连接字符
: ^4 e6 l( G8 a6 f语法是:paste(..., sep = " ", collapse = NULL)
" d7 D K( A! P( I7 ^例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'9 I9 i' d0 V# s
paste(x, y, z, d)8 O! Q) K7 D' g! |
例2:paste(c('x', 'y'), 1:4, sep = '')+ z% Y+ C+ M) m6 z
例3:paste('x', 1:4, sep = '', collapse = '+')2 A/ l4 l0 @8 W
! F/ e3 |7 S6 P: m7 X
|
zan
|