R统计学2 - 数据分析入门问题21-40

往期R统计学文章：

R���计学1 - 基础操作入门问题1-20

21. 如何对矩阵按行 (列) 作计算？

使用函数 apply()

vec = 1:20# 转换为矩阵mat = matrix (vec , ncol=4)# [,1] [,2] [,3] [,4]# [1,]    1    6   11   16# [2,]    2    7   12   17# [3,]    3    8   13   18# [4,]    4    9   14   19# [5,]    5   10   15   20cumsum(vec)# 返回一个向量，其元素是参数元素的累积和。#  [1]   1   3   6  10  15  21  28  36  45  55  66  78  91 105 120 136 153 171 190 210# 对列进行计算apply (mat, 2 , cumsum)# [,1] [,2] [,3] [,4]# [1,]    1    6   11   16# [2,]    3   13   23   33# [3,]    6   21   36   51# [4,]   10   30   50   70# [5,]   15   40   65   90

22.一组数中随机抽取数据？

函数 sample()

sample(n) 随机组合 1, . . . , n

sample(x) 随机组合向量 x, length(x) > 1

sample(x, replace = T) 解靴带法

sample(x,n) 非放回的从 x 中抽取 n 项

sample(x,n,replace = T) 放回的从 x 中抽取 n 项

sample(x,n, replace = T ,prob = p) 以概率p，放回的从 x 中抽取 n 项

n # paste("File_", var, ".txt", sep = "")为组合的文件名  write.table(save_string , paste("File_", var, ".txt", sep = ""))}