- 在线时间
- 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() #四舍五入7 X! a! p+ l6 m* T# e
例:x <- c(3.1416, 15.377, 269.7)
! z3 H6 b6 W5 F$ u" y" k$ Oround(x, 0) #保留整数位8 Q' O5 |: o! u
round(x, 2) #保留两位小数, m: V3 I: T7 ?% L
round(x, -1) #保留到十位
4 x. f6 z8 J* n5 r( E
' G# r& L* [4 l F4 D2、signif() #取有效数字(跟学过的有效数字不是一个意思)+ Z$ |8 t1 V# S7 [1 m# j/ Y9 {
例:略& }+ U( k( y3 ~7 ]; @
& e( g* |$ W) P# J e3、trunc() #取整1 V+ h. i, ]2 M. I9 f
floor() #向下取整: f" T% a, V9 P6 h
ceiling() #向上取整
# e3 g( W- o2 t1 P9 Y例:xx <- c(3.60, 12.47, -3.60, -12.47)2 K! B Z' _. y5 f
trunc(xx); k9 y' Z5 N$ V9 L6 v3 S
floor(xx)
( M9 H) f$ U9 Zceiling(xx)
- [5 r, V9 ^. K. ]9 I
6 ^4 R8 ]: O8 d4、logb(a, b) #以b为底的对数,省略b表示自然对数
6 E3 G5 Q, x6 L0 Y" M7 P( O$ y% p! X log() #自然对数6 h+ L. x/ d3 t7 i
log10() #以10为底的常用对数! D* k0 c& w# d# U
例:logb(8, 2)" V% G: A; c9 U1 r- }" s" n
log(8); logb(8)! r1 W* X! d! H2 O; X+ }3 {% Z
log10(100); logb(100, 10)
" {# V6 e8 N0 n. T$ U- M* ` g/ o: L4 O
5、sqrt() #平方根
* W" J5 t8 W1 s' x& v/ @8 o0 _ exp() #指数( I4 w+ k% m: z r- q- y j+ y
0 t5 [# I( {4 ]! Z. f3 a
6、sin() #正弦
- P# Q7 t/ C9 l& S7 j$ i cos() #余弦$ i. s' c& k. |& g8 ^. j; f
tan() #正切3 Z) ^* H4 j) |
asin() #反正弦! w2 t: c6 `% b- u a
acos() #反余弦7 n1 {) `0 A5 F+ a- R. V
atan() #反正切
- J% `% V9 B: m; _1 n' l9 A! I sinh() #双曲正弦" B5 Q1 b! G4 z/ q0 l0 s: B5 M
tanh() #双曲正切9 [2 E/ l A) {% B0 |" z' W1 w
/ V9 Y0 }+ B' y) u/ t$ _
7、nchar() #字符长度
6 I0 t5 |2 B6 u! A- [例:xx <- 'China is a great country'* H6 j7 N8 A( M% e0 o" O U
nchar(xx)6 M6 x& u; u+ ^* k8 i1 f% q! J/ T7 O
; Z/ E J; K! g) h l# s/ D; }/ _
8、substring() #取子字符串
( J6 b i2 T ~+ M0 M! z例:substring(xx, 1, 5)% ?0 a7 W$ l2 v0 a% g, C
& R3 S$ {6 ?3 S% y' O" }9、paste() #连接字符
3 e7 K* ^9 p# T* P5 G: C/ @语法是:paste(..., sep = " ", collapse = NULL)( K- u! I- v0 m7 y. V' X5 r3 m
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'
1 h2 l; m$ z* s7 bpaste(x, y, z, d); J" d' r5 G4 ?; S
例2:paste(c('x', 'y'), 1:4, sep = '')
' [ P% k! m. C% J# g1 L2 r2 d% G例3:paste('x', 1:4, sep = '', collapse = '+')
/ ?- {9 O/ T! J+ v b% X% s& F: ~
* W: U1 G: f* e2 [ |
zan
|