- 在线时间
- 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() #四舍五入8 g9 X" x, K% i! b6 M
例:x <- c(3.1416, 15.377, 269.7)
. I, M4 `7 R& dround(x, 0) #保留整数位% p- P9 [, G) w0 N
round(x, 2) #保留两位小数! E b' p. G1 Y2 j+ Y# {& _
round(x, -1) #保留到十位
r' H$ o* L2 j0 f/ U6 }
2 V* ~! [/ ^4 Z" @9 B1 P% l2、signif() #取有效数字(跟学过的有效数字不是一个意思)
, q# U) I+ `6 Y; d1 S( _7 B例:略0 v( O% R0 T: o- U- t0 i8 K
- r, O( G: o. U' W, H3、trunc() #取整
; V6 e: T1 l: g S; @) I! a floor() #向下取整9 X! v& z! R( G" M! }3 k
ceiling() #向上取整: S2 z. I2 ^/ x! ?( d2 Z: _
例:xx <- c(3.60, 12.47, -3.60, -12.47)
6 J$ Y2 k- Y# H4 u' f. qtrunc(xx)
3 e. i) ~! V1 S0 x5 B4 J1 ffloor(xx)
" w0 f. D# @- c$ l2 l Pceiling(xx)
7 d- G8 E% n3 Y2 M) U0 K5 ^4 D) `, C% o
4、logb(a, b) #以b为底的对数,省略b表示自然对数
6 I- p+ S/ O# R# T/ y( ~1 L log() #自然对数( E1 l1 t/ V! g5 b% V0 q
log10() #以10为底的常用对数8 x7 Y4 y) G# o) I4 J
例:logb(8, 2): o6 [3 }. N f* l) H
log(8); logb(8)
1 Y7 L3 u9 S3 B9 Plog10(100); logb(100, 10)
# _% B4 a6 e8 z, k7 S l/ t
# f1 _7 S2 G* h5、sqrt() #平方根' T0 I3 R) m6 [! q8 ?5 q! V
exp() #指数1 O. D) L6 A( T3 j- ?
# \" f7 H: Y- G4 k+ I! u/ g
6、sin() #正弦
" K0 j" _8 {% X1 g$ e9 O+ S cos() #余弦' R) `6 k1 d% y& I- b R# c& c
tan() #正切9 t$ Q3 h" i+ [
asin() #反正弦3 e: y# v% r; v% N# P
acos() #反余弦5 E+ T [! ]# G( U7 E- {1 Z. W
atan() #反正切! W1 |/ t! Y3 y4 P" j
sinh() #双曲正弦
5 r/ Z: i1 ^0 B. J2 E% N7 r* t tanh() #双曲正切
6 z. a5 ?/ i: C; n) }( e% e: c1 i
& h `$ y0 j# m# g" u5 {7、nchar() #字符长度
( p5 W- L) [- O' u' r例:xx <- 'China is a great country'2 x' ]2 }' a9 q4 s5 a9 k: ], e( r
nchar(xx), r, G9 q) G. i( V( J" Q" q9 [
# j5 c1 G$ x* H* O! C6 _; Q& P8、substring() #取子字符串1 N' F$ P( _/ W& \! T {
例:substring(xx, 1, 5) ~; P- |( z Q4 n1 \8 j
3 M9 ?9 u1 a! p/ ~9 `9 ^
9、paste() #连接字符 K, z! K, s: R7 n, ]3 x( I# a+ g
语法是:paste(..., sep = " ", collapse = NULL)) Z; W$ e5 ^, @
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'7 K* y6 b& X! {/ B. |1 ]: G* B# i/ Y+ f
paste(x, y, z, d)( ?5 t& }/ [3 d! f! o# B( Z
例2:paste(c('x', 'y'), 1:4, sep = '')
8 z* a" u/ {8 s! ~# N9 k例3:paste('x', 1:4, sep = '', collapse = '+')
$ m* @, G9 p$ O( Z, i
6 [3 A! u1 G' j |
zan
|