- 在线时间
- 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() #四舍五入
2 m6 a' r: W4 Y' z0 i0 o: d例:x <- c(3.1416, 15.377, 269.7)" c! _) L) j# R# o
round(x, 0) #保留整数位
( R$ y c5 G& R: B" w" x5 dround(x, 2) #保留两位小数4 C$ k+ D4 s/ n- c
round(x, -1) #保留到十位: \+ J9 b# u! F5 h% a, }
' l# @ X3 J4 B) v2 [ @' \# X
2、signif() #取有效数字(跟学过的有效数字不是一个意思)
2 E w7 g7 U7 u: A2 Q$ d* @5 i9 u( l) L) z例:略
3 Q4 W2 d" s5 b) v6 Q+ j! k( l9 O5 F' T4 z
3、trunc() #取整! m) H8 ~7 d& Q% f
floor() #向下取整5 h7 ^2 S1 W! i
ceiling() #向上取整' K# M: h+ ? n: Z, {; f5 ]
例:xx <- c(3.60, 12.47, -3.60, -12.47)
& I6 }; [, I ]( v0 Ttrunc(xx)1 K. g. T' r2 k- P5 }; h7 z
floor(xx); U8 D5 |7 Y7 V2 |* w
ceiling(xx)
/ _8 Q0 a# z$ `. f6 m
* q. q8 v; d1 f- q* U4、logb(a, b) #以b为底的对数,省略b表示自然对数
: E% \# v! ]) o2 m5 g' O& P log() #自然对数7 h$ p. I2 h9 F# s4 H; s5 I" V
log10() #以10为底的常用对数
/ o( M8 v! D- ?( J例:logb(8, 2)
$ {8 F/ t. K% Slog(8); logb(8)
' X, k( w' t: L; l+ D, Tlog10(100); logb(100, 10)
$ u/ b; j- [$ L4 q" \$ s
1 X: [& m3 ^! D% [# z# k5、sqrt() #平方根
3 A" G! Q: t8 _; O exp() #指数 N3 f! o' p# P& x! T8 e- r* w
7 t% W6 b* J9 m6、sin() #正弦( L6 c3 ?+ ^8 ]; z
cos() #余弦7 G6 C5 ~$ v/ H: l! d! q }3 O
tan() #正切
' N5 F1 i* U% ^6 z4 e+ W5 L) q asin() #反正弦9 b" G3 r6 W4 `7 M; v V
acos() #反余弦# E/ ?3 C" X) ^# X( x
atan() #反正切5 s l) f1 c- ~' w; O
sinh() #双曲正弦/ a7 B9 }" p% n
tanh() #双曲正切6 X4 ]; h. k! a! u: r( [3 ^
) `6 e& S8 F/ _2 X
7、nchar() #字符长度
$ ^! c, ^+ V5 a5 o. b例:xx <- 'China is a great country'
& v4 v5 G" z) Pnchar(xx)
/ c, H! }8 d5 i& D* ~/ ? S, H
: v. c; w$ I! H8、substring() #取子字符串6 J# B8 p' ~" v
例:substring(xx, 1, 5)
& J! @) H% [" k
9 Y! D5 e) m+ I% ]9、paste() #连接字符/ A, e, |# l {1 `; W0 h I: |7 [" ]
语法是:paste(..., sep = " ", collapse = NULL)" c! W2 c$ f2 U: G
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'. h2 ^- z$ A0 z2 O# H
paste(x, y, z, d)
( a5 [0 e- z6 N( K例2:paste(c('x', 'y'), 1:4, sep = '')
' o' ?. m9 B6 [7 q9 M% _2 E( O$ ]例3:paste('x', 1:4, sep = '', collapse = '+')
6 @4 v3 Z. Z. I- Q2 l
5 j2 R% S& [1 J |
zan
|