- 在线时间
- 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 V p* p o& L0 H* {# V
例:x <- c(3.1416, 15.377, 269.7)
" \4 l% M' y% O# Pround(x, 0) #保留整数位$ X- U! v; m' R- w0 P% N6 ~
round(x, 2) #保留两位小数
5 F, \$ ]+ z2 K/ C# qround(x, -1) #保留到十位
# j8 Q2 m. w6 q' z* _: z, D7 ^; J* V0 {; z6 r4 h* u
2、signif() #取有效数字(跟学过的有效数字不是一个意思)! [" [+ G$ V0 z$ r& F: m
例:略
) S. F/ T3 Z/ C4 d
6 \# O( k* m& L/ |8 g& D3、trunc() #取整% }" N4 d, t# x7 J# E1 _) d
floor() #向下取整$ P. y1 r% t, A6 a B5 Z& f
ceiling() #向上取整% L4 ?4 D4 F" v
例:xx <- c(3.60, 12.47, -3.60, -12.47)
. s$ x# l* d3 F& C" B0 H/ h: ?trunc(xx)' j! e1 a4 h4 M2 J$ @9 C5 @
floor(xx)4 q8 V; c7 s) V3 E
ceiling(xx)
$ i, c+ M! ~7 ]6 U) Y
0 i8 p) [4 Z) r: b' y! Q% X4、logb(a, b) #以b为底的对数,省略b表示自然对数
3 h0 M! k5 o: R2 E" ~ log() #自然对数' h% B2 _. Y* [& s S1 z( ~
log10() #以10为底的常用对数
# u, L. F4 ] g3 C+ @& \$ N例:logb(8, 2)
) ]3 w. K! `% M) i# v) `1 j. Llog(8); logb(8)% `" T) q5 C9 |! e
log10(100); logb(100, 10): v2 N$ \/ p) A0 `8 @
/ S) r, Q0 D7 f. k- i# Y4 B3 A
5、sqrt() #平方根3 D: [! u9 c4 [& w x7 M8 Y! J' X
exp() #指数5 T6 b" y- m3 e: F
' ?* ^$ @; R) m; E! _' \3 L/ T6、sin() #正弦
: p4 ?! F+ Z# G3 \/ T; B cos() #余弦
3 H# x. u: O2 q# V* n/ h8 N tan() #正切2 e/ X f1 C5 b1 d
asin() #反正弦
4 `/ Z$ d& ?8 {# e. F8 U+ x acos() #反余弦
s# J/ n3 C/ X! E atan() #反正切
9 K6 J/ ^9 N# ]$ P sinh() #双曲正弦; ~2 N1 H* o9 g
tanh() #双曲正切% ]% p2 [: f X
1 u( F" e. z3 d* O0 \9 ?. T! b7、nchar() #字符长度
8 ~$ G' ^% i" N& ~% N' v/ ]: C例:xx <- 'China is a great country'- T7 l% P* e4 T# z# J* o0 x+ e
nchar(xx); z& [: y9 x* }! W& F' V6 @
$ u* g7 `# c' U8 L8 {9 B
8、substring() #取子字符串
% ]! e) y* U4 R" c% b% @6 v例:substring(xx, 1, 5)8 a7 V+ p- y' S% Z* W
. T" l, w7 g/ k6 _
9、paste() #连接字符' p% V8 D* J8 d
语法是:paste(..., sep = " ", collapse = NULL) H$ ~5 \, Z9 i% Z" @* [; C
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student', t- q. u- Q; n; M5 h% ^
paste(x, y, z, d)
* X$ z' } @8 J/ Z, g0 c4 f9 ^例2:paste(c('x', 'y'), 1:4, sep = '')
* R2 C- @ S4 r8 |; R/ R例3:paste('x', 1:4, sep = '', collapse = '+')
& ^/ N2 t- ^* T$ D* J0 i1 K. \1 u1 D p l! Q+ h* t
|
zan
|