使用方法如下：
seq(0,1,length.out=100)
上一行语句生成一个100个值的等差数列，首项为0，末项为1
拓展：
你还可以使用rep函数生成向量。
用法如下：
rep(0,100)
第一个位置表示重复的单元，第二个位置表示重复的次数。这样会生成一个100个0的向量。
#1.如果总体是自然数这样的等差数列，可以直接利用seq函数挑出奇数（或偶数）：n <- 1:100
( ji <- seq(from=1,to=100,by=2) )
( ou <- setdiff(n,ji) )
rm(ji)rm(ou)
#2.如果总体是杂乱无章的集合，可以写个小函数判断某个数的奇偶：
jishu <- function(x){
ifelse(x%%2 ==0,F,T)
}
( ji <- n[jishu(n)] )
( ou <- n[!jishu(n)] )
#通过上面的任一一种方法将总体的奇数偶数区分开，接下来就可以使用sample函数抽样了：
sample(ji,5)
