Come estrarre multipli di un numero da un vettore in R

Question

Ho un vettore diciamo

x <- 1:1000

e voglio estrarre i multipli di 8 da esso.

Cosa devo fare? (non voglio fare x[-c(8,16,24,.....)])

L'obiettivo è quello di rimuovere i multipli di 8 dal x vettore

Answer 1

Per questo si può utilizzare l'operatore modulo, vale a dire %%. Prendiamo ad esempio:

> 322%%8 
[1] 2 

che ti dice che dopo aver diviso 322 da 8, 2 rimane, vale a dire 320 è esattamente 40 volte 8, lasciando 2.

In Te esempio si può usare in combinazione con %% sottoinsiemi di ottenere i multipli di 8. si ricordi che %% rese di 0 multipli esatti di 8:

input = 1:1000 
multiple_of_8 = (input %% 8) == 0 
head(multiple_of_8) 
[1] FALSE FALSE FALSE FALSE FALSE FALSE 
length(multiple_of_8) 
[1] 1000 

inoltre notare che %% è un'operazione vettorizzata, cioè il lato sinistro è un vettore, il risultato sarà anche un vettore. Il multiple_of_8 vettore ora contiene 1000 Logicals affermando se quel particolare elemento di input è un multiplo esatto di 8. Usando quel vettore logico sottoinsieme farti il ​​risultato è necessario:

input[multiple_of_8] 
    [1] 8 16 24 32 40 48 56 64 72 80 88 96 104 112 120 
[16] 128 136 144 152 160 168 176 184 192 200 208 216 224 232 240 
[31] 248 256 264 272 280 288 296 304 312 320 328 336 344 352 360 
[46] 368 376 384 392 400 408 416 424 432 440 448 456 464 472 480 
[61] 488 496 504 512 520 528 536 544 552 560 568 576 584 592 600 
[76] 608 616 624 632 640 648 656 664 672 680 688 696 704 712 720 
[91] 728 736 744 752 760 768 776 784 792 800 808 816 824 832 840 
[106] 848 856 864 872 880 888 896 904 912 920 928 936 944 952 960 
[121] 968 976 984 992 1000 

o in modo più compatto:

input[(input %% 8) == 0]