- 在线时间
- 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() #四舍五入
5 b3 m; Q' V: N! s& b, u( l例:x <- c(3.1416, 15.377, 269.7)4 ^3 S4 z8 R5 z$ \1 E
round(x, 0) #保留整数位' W2 \7 C' Z' U3 L( V
round(x, 2) #保留两位小数
2 X% R4 }, C" ?5 u4 A; C' ^5 Vround(x, -1) #保留到十位. }3 y$ V( a1 V8 V% D1 ?
8 x- c! q9 u1 U3 i7 {& x
2、signif() #取有效数字(跟学过的有效数字不是一个意思)
$ U2 e4 b9 e$ V1 q- @例:略* e9 f' H$ } v% _1 l- _
M, h. a6 h i3、trunc() #取整9 o K. k: H& K4 b0 w4 S8 P
floor() #向下取整
: d# o7 Q8 N2 T ceiling() #向上取整
% S; ?3 L7 S1 W. `% E4 X例:xx <- c(3.60, 12.47, -3.60, -12.47)
' M1 R# X% {( `( ptrunc(xx)
% T) r4 l2 B, W. _% Z, N3 d4 o1 ?; O* wfloor(xx)
1 `* ~8 m+ ?( x9 @( e" fceiling(xx)6 m8 C8 h8 o& H
: ^$ F1 O8 S7 m L
4、logb(a, b) #以b为底的对数,省略b表示自然对数, _, c* @# M( E, C2 W& p; n) r* i
log() #自然对数/ D' \2 j( i7 D( i
log10() #以10为底的常用对数: t( ]" U+ A/ }# a5 d4 ~6 x# E
例:logb(8, 2)" ^# Z2 G+ t- d! I
log(8); logb(8)& N& ~0 U6 C' Y5 ?7 r T( q0 m
log10(100); logb(100, 10)- {9 W6 D) q3 M$ d, G$ X
7 _8 H5 @' U6 x1 r) ~6 `1 d- l) [
5、sqrt() #平方根; s3 Q2 r& w8 `
exp() #指数
& y5 l* N* k$ H+ p G4 z. @1 L. ?# {3 P
6、sin() #正弦( P* c" x8 e- x" @7 V, O0 o+ P: g
cos() #余弦% z* t& ~2 x6 T! m3 y
tan() #正切
/ S& X. ~5 L/ g0 H asin() #反正弦+ f; T# m( f* p
acos() #反余弦
j% X( g% u) a; V4 E2 j atan() #反正切
% D7 | |) e$ N sinh() #双曲正弦$ R- E* \, P' u. @* P
tanh() #双曲正切4 G3 `1 w) Z$ K/ {* h3 O
! B0 z4 v" v: \6 X* C, H
7、nchar() #字符长度5 H/ k0 b2 K& G5 R
例:xx <- 'China is a great country'
3 d2 |! ?$ S' M: u) Y4 H6 w$ mnchar(xx)
3 G7 J) O7 l- {# O3 i1 B/ ^1 s- r: R; _' M
8、substring() #取子字符串+ E% j; C9 a' T4 `( N6 Y
例:substring(xx, 1, 5)0 g( ~- t* q4 j/ ^/ c# m" D1 w
4 A1 `: N: n9 n! N+ L" U ]9、paste() #连接字符
. F; ?6 X- s! E; Y5 M' C" F语法是:paste(..., sep = " ", collapse = NULL)
; L7 I! Q6 k+ i0 n' W- T* i例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'
& Y3 J: X/ _: J5 o! E* u! m. A/ v0 [+ Zpaste(x, y, z, d)
- I( S+ e/ S" V# L& F例2:paste(c('x', 'y'), 1:4, sep = '')% k4 X6 j3 Y: Q( P: ]+ W
例3:paste('x', 1:4, sep = '', collapse = '+')& W8 A: B% m! y4 V* k
) D. R* f7 |6 S1 W0 p2 a |
zan
|