- 在线时间
- 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() #四舍五入( X2 n: P* z. g' N" v) p! z P
例:x <- c(3.1416, 15.377, 269.7)% V, r! a- g; p
round(x, 0) #保留整数位. _7 \/ N6 c$ A8 G5 Y( C2 J
round(x, 2) #保留两位小数3 @9 W* _4 n. M* X$ q
round(x, -1) #保留到十位
. Q7 i9 g$ B8 P9 Q. Y, o* K0 R' @ h0 v( C; \9 z, h) _5 H
2、signif() #取有效数字(跟学过的有效数字不是一个意思) ^+ |8 b- K4 C4 @- S
例:略$ @+ p3 s5 j# s
6 D3 M# U1 m( z3、trunc() #取整3 C+ y& J9 D) `8 R- Q! y
floor() #向下取整
. a+ w& G: i8 H- ], Y( x: [: {0 m ceiling() #向上取整
# V5 p8 `+ }6 ?例:xx <- c(3.60, 12.47, -3.60, -12.47)' g4 r; r/ @6 z# z# [
trunc(xx)+ t+ b2 W6 ~2 P1 N0 m, O
floor(xx)
& x1 E5 k8 M9 fceiling(xx), J4 t& B# T) d! b$ X7 M2 y+ }& K7 m
- T8 U8 T. g8 t1 _/ t5 l
4、logb(a, b) #以b为底的对数,省略b表示自然对数) `# K6 w, j6 m/ Z; p- t
log() #自然对数
; ]9 i6 k7 @* b# k log10() #以10为底的常用对数
8 ?0 I" O( g! K8 n8 C' L8 F1 {# P例:logb(8, 2)% ^. Y' ?; w: k9 Q: V
log(8); logb(8)* E0 M! j$ Y" o! s( [' a
log10(100); logb(100, 10)" H4 `+ c% D) h% y3 J5 o5 J" v# G
0 J3 t7 k% t, y- A" F5、sqrt() #平方根
+ @2 x* N' G- v- E7 I D exp() #指数) n* B& A2 y3 d$ |; M+ L) I' [
+ M& @, V( A# p& E' ~% ]6 x
6、sin() #正弦: M' a+ R8 A8 u q) `, n1 t
cos() #余弦
* {" f+ D. {" X4 [' y7 L# _# X" V tan() #正切
% p) r# Z3 a9 W L asin() #反正弦
* J5 D. a8 {2 D; B) h$ I acos() #反余弦
2 X3 J* e- L( m6 q atan() #反正切
) B" i) n. L8 P sinh() #双曲正弦
n/ S5 z# }: ]( K7 z tanh() #双曲正切
+ L, H: m7 p9 J8 K
' i: F3 g# K. ~, e7、nchar() #字符长度
. Y, V) P8 x1 D例:xx <- 'China is a great country'
9 F8 a# `8 F; I+ b# G4 Inchar(xx)+ t' K+ [: T B5 p _" W8 x# E" i$ J
# w0 h B% }/ H. t; p8、substring() #取子字符串# z; Q3 v3 ~. N* ~5 _
例:substring(xx, 1, 5)
/ X* J: |1 c: ]+ O- u$ J" h2 d! z) d* D" R
9、paste() #连接字符
( u7 J2 s/ O/ o8 \+ k语法是:paste(..., sep = " ", collapse = NULL)
( b1 w8 Y0 p1 a$ n$ `例1:x <- 'I'; y <- 'am'; z <- 'a'; d <- 'student'
1 M. Z. p% e% J8 |paste(x, y, z, d)
8 F4 @4 } }9 y: U例2:paste(c('x', 'y'), 1:4, sep = '')
5 h3 k* D+ F' n' z例3:paste('x', 1:4, sep = '', collapse = '+')
: P7 [ t0 l" O" y3 p8 D
" y! ]7 u+ }3 \/ v0 T |
zan
|