- 在线时间
- 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() #四舍五入
" z$ i4 F4 n4 }3 U例:x <- c(3.1416, 15.377, 269.7)
% W! c! H2 b) t, z! ~7 ~0 G8 F/ s" eround(x, 0) #保留整数位; K' [3 _: t% k$ r/ D" q1 \; A
round(x, 2) #保留两位小数' h! | ?8 H, x6 @ x; T5 E
round(x, -1) #保留到十位
. p2 L6 {7 C0 |+ {- C& X( Z$ L4 Y5 ^- b0 j
1 U6 m. B/ e- i- p$ t* v2、signif() #取有效数字(跟学过的有效数字不是一个意思)
+ Y6 T" x G- T3 D& v例:略
4 K8 P! O/ \" S9 Y, U3 h+ f" V3 Z
3 ^! D& U/ g7 E5 N% {3、trunc() #取整
9 y I/ b$ y9 C# Z! n9 { floor() #向下取整* _* B- l. N/ m
ceiling() #向上取整+ s: n, y# q U. O( @" e1 A1 M- ?
例:xx <- c(3.60, 12.47, -3.60, -12.47) M5 |1 R+ c9 x, S
trunc(xx)( z. e( v/ ]: i$ `6 J2 s0 [
floor(xx): T- v( S( a0 i
ceiling(xx)) J+ J3 C' z5 q# x) W1 `. X* G
: q' G( {& {9 k
4、logb(a, b) #以b为底的对数,省略b表示自然对数
% k; P6 k7 W: P' u, i log() #自然对数( ^: Y1 {7 c% E2 E# a
log10() #以10为底的常用对数+ @ f/ T( P1 j& C5 I4 @
例:logb(8, 2), U8 I7 Y/ \! R( @ `' U
log(8); logb(8)
. d6 \8 W2 ^ H. l% Ilog10(100); logb(100, 10)
5 N. r" ~! @& _& X) `
, A5 B: e6 e* s/ } o6 _5、sqrt() #平方根
0 ^7 j( E5 j' X7 l exp() #指数5 C3 M& B/ Z! N% d3 j% F
0 z- n& `8 p! T b6、sin() #正弦
- C' Q8 _ M* O- [6 t cos() #余弦
" Z. Y0 }7 H+ J9 X2 i! e tan() #正切. v" m. W, U# i: s4 Q6 z
asin() #反正弦
% N2 z3 Z7 V( e( ]/ H/ U acos() #反余弦
6 ^$ t8 Z5 a; n+ P, ?" d, Q atan() #反正切
4 Q2 i5 o3 \6 e5 L) _! A sinh() #双曲正弦
8 s( L8 I3 r" d* I tanh() #双曲正切$ f3 ^& p Z6 V7 A+ \* h
; C/ B% r. W6 K6 T+ X1 c5 q5 X
7、nchar() #字符长度
# C8 \+ S/ Q2 [: J! L例:xx <- 'China is a great country'
1 n# C: V: L4 y6 y+ C% M/ n: Gnchar(xx)0 l6 }! l2 Z) ~' Q4 i2 r1 |) }
. m7 h; i& G1 P# s, Q4 U; ~! \7 y8、substring() #取子字符串
" x" r5 n9 A; d( ^4 }例:substring(xx, 1, 5)* A7 }5 a& v) b7 @; m
$ d! a- @3 L7 G% d$ ~
9、paste() #连接字符7 k- ?$ b/ f- H9 _! j
语法是:paste(..., sep = " ", collapse = NULL)5 l/ ^/ G1 p! l: u
例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'6 B/ @; J$ {0 a, N/ ^* I3 W5 e j
paste(x, y, z, d)* r4 A' ?* Z1 l8 n% j Z
例2:paste(c('x', 'y'), 1:4, sep = '')
; }& S4 k+ E: w9 h! J$ g( O# K例3:paste('x', 1:4, sep = '', collapse = '+')
) @ e6 y0 ]* F) Q, h: B
$ Q' p7 O/ l$ }: D% R# p |
zan
|