如何仅在 R 中创建一个仅具有升值的随机整数向量?
要创建一个仅具有升值的随机整数向量,我们可以使用 sample.int 进行随机抽样,并且对于增量值,需要使用 cummax 函数。例如,可以使用 cummax(sample.int(5)) 命令创建一个大小为 5、值最高为 5、从 1 开始的随机整数向量。
示例
x1<-cummax(sample.int(10)) x1
输出
[1] 1 9 9 9 9 9 9 10 10 10
示例
x2<-cummax(sample.int(20)) x2
输出
[1] 17 18 18 18 18 18 18 18 18 19 19 19 19 19 19 20 20 20 20 20
示例
x3<-cummax(sample.int(25)) x3
输出
[1] 7 7 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 24 24 24 24 24 25 25 25
示例
x4<-cummax(sample.int(50)) x4
输出
[1] 3 14 14 34 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 43 46 49 49 49 [26] 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 49 50 50
示例
x5<-cummax(sample.int(100)) x5
输出
[1] 8 55 86 88 88 88 88 88 88 88 94 94 94 94 94 94 94 94 [19] 94 94 94 94 94 94 94 94 94 94 94 94 94 94 94 94 94 98 [37] 98 98 98 98 98 98 98 98 98 98 98 98 98 98 98 98 98 98 [55] 98 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 [73] 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 100 [91] 100 100 100 100 100 100 100 100 100 100
示例
x6<-cummax(sample.int(150)) x6
输出
[1] 108 108 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 [19] 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 [37] 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 [55] 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 [73] 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 [91] 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 147 [109] 147 147 147 150 150 150 150 150 150 150 150 150 150 150 150 150 150 150 [127] 150 150 150 150 150 150 150 150 150 150 150 150 150 150 150 150 150 150 [145] 150 150 150 150 150 150
示例
x7<-cummax(sample.int(200)) x7
输出
[1] 74 183 183 183 183 183 183 183 183 183 183 183 183 183 183 183 183 183 [19] 183 183 183 183 183 183 183 183 183 183 183 183 183 191 191 191 193 193 [37] 193 193 193 193 193 193 193 193 193 193 193 193 193 193 193 193 193 193 [55] 193 193 193 193 193 193 193 193 193 193 193 193 193 197 197 198 198 198 [73] 198 198 198 198 198 198 198 198 198 198 198 198 198 198 198 198 198 198 [91] 198 198 198 198 198 198 198 200 200 200 200 200 200 200 200 200 200 200 [109] 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 [127] 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 [145] 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 [163] 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 [181] 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 200 [199] 200 200
示例
x8<-cummax(sample.int(250)) x8
输出
[1] 217 217 235 235 235 235 235 235 235 235 235 235 240 240 240 240 240 240 [19] 240 240 240 240 240 240 240 240 240 240 240 242 242 242 250 250 250 250 [37] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [55] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [73] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [91] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [109] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [127] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [145] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [163] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [181] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [199] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [217] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 [235] 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250 250
示例
x9<-cummax(sample.int(500)) x9
输出
[1] 268 294 294 294 294 294 487 487 487 487 487 487 487 487 487 487 487 487 [19] 487 487 487 487 487 487 496 496 496 496 496 496 496 496 496 496 496 496 [37] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [55] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [73] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [91] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [109] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [127] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [145] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [163] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [181] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [199] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [217] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [235] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [253] 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 496 [271] 496 496 496 496 496 496 496 499 499 499 499 499 499 499 499 499 499 499 [289] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [307] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [325] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [343] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [361] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [379] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [397] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [415] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [433] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [451] 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 499 [469] 499 499 499 499 499 500 500 500 500 500 500 500 500 500 500 500 500 500 [487] 500 500 500 500 500 500 500 500 500 500 500 500 500 500
示例
x10<-cummax(sample.int(300)) x10
输出
[1] 121 207 269 273 273 274 274 274 274 274 274 274 274 298 298 298 298 298 [19] 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 [37] 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 [55] 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 [73] 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 [91] 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 [109] 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 298 [127] 298 298 298 298 298 298 298 298 298 298 298 298 298 298 299 299 299 299 [145] 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 [163] 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 [181] 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 [199] 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 [217] 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 299 300 [235] 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 [253] 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 [271] 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 300 [289] 300 300 300 300 300 300 300 300 300 300 300 300
广告