Podziel tysiące kolumn naraz przez „/” na wielu liniach, sortuj wartości w nowych wierszach i dodawaj wartości „NA”

Chciałbym podzielić ramkę danych z tysiącami kolumn. Ramka danych wygląda tak:

# sample data of four columns
sample <-read.table(stdin(),header=TRUE,sep="")
POS v1  v2  v3  v4
152 0   0/1 0/2 0/1/2
73  1   0   0/1 0/1
185 0   1   0/3 0

Wyjście powinno być:

POS v1  v2  v3  v4
152 0   0   0   0
152 NA  1   NA  1
152 NA  NA  2   2
73  NA  0   0   0
73  1   NA  1   1
185 0   NA  0   0
185 NA  1   NA  NA
185 NA  NA  NA  NA
185 NA  NA  3   NA

Wartości 0, 1, 2 i 3 powinny być uporządkowane na nowych tak otrzymanych liniach, podczas gdy wartość w polu POS powinna być powtórzona. Następnie należy wstawić wartość NA, aby uzyskać tę samą długość kolumn.

questionAnswers(4)

yourAnswerToTheQuestion