问题:将列表中的所有元素“展平”,赋值给一个向量
解决方案:使用unlist()函数;
在许多情况下需要向量,例如,baseR中的许多统计函数需要一个向量作为输入,例如,如果iq.score是一个包含数值的列表,那么我们不可以直接计算它的平均值。因为mean()函数接受一个向量作为输入,而iq.score是一个列表对象,即
> iq.scores <- list(100, 120, 103, 80, 99)
> mean(iq.scores)
[1] NA
Warning message:
In mean.default(iq.scores) : 参数不是数值也不是逻辑值:回覆NA
使用unlist()将列表对象展开成向量。
> mean(unlist(iq.scores))
[1] 100.4
> unlist(iq.scores)
[1] 100 120 103 80 99
> mean(c(100,120,103, 80,99))
上面这个例子非常简单,因为这个列表每个元素是由一个数值构成的。
例子2:列表的每个元素是由向量构成,即
> ex2 <- list(1:100, 101:200, 201:300, 301:400, 401:500)
> mean(unlist(ex2))
[1] 250.5
> unlist(ex2)
[1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
[18] 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34
[35] 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51
[52] 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68
[69] 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85
[86] 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102
[103] 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119
[120] 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136
[137] 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153
[154] 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170
[171] 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187
[188] 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204
[205] 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221
[222] 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238
[239] 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255
[256] 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272
[273] 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289
[290] 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306
[307] 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323
[324] 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340
[341] 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357
[358] 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374
[375] 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391
[392] 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408
[409] 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425
[426] 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442
[443] 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459
[460] 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476
[477] 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493
[494] 494 495 496 497 498 499 500
例3:
列表的每个元素是向量,并且向量的长度相等,就如例2中一样,这样可以将这个列表变成矩阵的形式。
> ex2 <- list(1:100, 101:200, 201:300, 301:400, 401:500)
> matrix(unlist(ex2), nrow=100,ncol=5, byrow=FALSE)
[,1] [,2] [,3] [,4] [,5]
[1,] 1 101 201 301 401
[2,] 2 102 202 302 402
[3,] 3 103 203 303 403
[4,] 4 104 204 304 404
[5,] 5 105 205 305 405
[6,] 6 106 206 306 406
[7,] 7 107 207 307 407
[8,] 8 108 208 308 408
[9,] 9 109 209 309 409
[10,] 10 110 210 310 410
[11,] 11 111 211 311 411
[12,] 12 112 212 312 412
[13,] 13 113 213 313 413
[14,] 14 114 214 314 414
[15,] 15 115 215 315 415
[16,] 16 116 216 316 416
[17,] 17 117 217 317 417
[18,] 18 118 218 318 418
[19,] 19 119 219 319 419
[20,] 20 120 220 320 420
[21,] 21 121 221 321 421
[22,] 22 122 222 322 422
[23,] 23 123 223 323 423
[24,] 24 124 224 324 424
[25,] 25 125 225 325 425
[26,] 26 126 226 326 426
[27,] 27 127 227 327 427
[28,] 28 128 228 328 428
[29,] 29 129 229 329 429
[30,] 30 130 230 330 430
[31,] 31 131 231 331 431
[32,] 32 132 232 332 432
[33,] 33 133 233 333 433
[34,] 34 134 234 334 434
[35,] 35 135 235 335 435
[36,] 36 136 236 336 436
[37,] 37 137 237 337 437
[38,] 38 138 238 338 438
[39,] 39 139 239 339 439
[40,] 40 140 240 340 440
[41,] 41 141 241 341 441
[42,] 42 142 242 342 442
[43,] 43 143 243 343 443
[44,] 44 144 244 344 444
[45,] 45 145 245 345 445
[46,] 46 146 246 346 446
[47,] 47 147 247 347 447
[48,] 48 148 248 348 448
[49,] 49 149 249 349 449
[50,] 50 150 250 350 450
[51,] 51 151 251 351 451
[52,] 52 152 252 352 452
[53,] 53 153 253 353 453
[54,] 54 154 254 354 454
[55,] 55 155 255 355 455
[56,] 56 156 256 356 456
[57,] 57 157 257 357 457
[58,] 58 158 258 358 458
[59,] 59 159 259 359 459
[60,] 60 160 260 360 460
[61,] 61 161 261 361 461
[62,] 62 162 262 362 462
[63,] 63 163 263 363 463
[64,] 64 164 264 364 464
[65,] 65 165 265 365 465
[66,] 66 166 266 366 466
[67,] 67 167 267 367 467
[68,] 68 168 268 368 468
[69,] 69 169 269 369 469
[70,] 70 170 270 370 470
[71,] 71 171 271 371 471
[72,] 72 172 272 372 472
[73,] 73 173 273 373 473
[74,] 74 174 274 374 474
[75,] 75 175 275 375 475
[76,] 76 176 276 376 476
[77,] 77 177 277 377 477
[78,] 78 178 278 378 478
[79,] 79 179 279 379 479
[80,] 80 180 280 380 480
[81,] 81 181 281 381 481
[82,] 82 182 282 382 482
[83,] 83 183 283 383 483
[84,] 84 184 284 384 484
[85,] 85 185 285 385 485
[86,] 86 186 286 386 486
[87,] 87 187 287 387 487
[88,] 88 188 288 388 488
[89,] 89 189 289 389 489
[90,] 90 190 290 390 490
[91,] 91 191 291 391 491
[92,] 92 192 292 392 492
[93,] 93 193 293 393 493
[94,] 94 194 294 394 494
[95,] 95 195 295 395 495
[96,] 96 196 296 396 496
[97,] 97 197 297 397 497
[98,] 98 198 298 398 498
[99,] 99 199 299 399 499
[100,] 100 200 300 400 500
参考:
《R语言经典实例(原书第2版)》(2020年5月出版, 机工社)(这本书写的很好,对于初学者很友好,推荐)