Can you clarify what you mean by "list the score by visit"? Do you actually mean "arrange by" ?
library(dplyr)
#Sample data on a copy/paste friendly format, replace this with your own data.
sample_data <- data.frame(
stringsAsFactors = FALSE,
USUBJID = c("PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01",
"PCM204-101-840-01-01","PCM204-101-840-01-01"),
QSSTRESC = c(3,2,1,2,1,4,3,4,2,2,3,
2,2,2,1,1,1,2,2,3,3,1,2,2,3,2,1,1,2,2,
0),
VISIT = c("Screening Visit","V4-Month 1",
"V5-Month 3","V6-Month 6","V7-Month 12",
"V8-Annual F/U - Year 2","Screening Visit","V4-Month 1",
"V5-Month 3","V6-Month 6","V7-Month 12","V8-Annual F/U - Year 2",
"Screening Visit","V4-Month 1","V5-Month 3",
"V6-Month 6","V7-Month 12","V8-Annual F/U - Year 2",
"Screening Visit","V4-Month 1","V5-Month 3","V6-Month 6",
"V7-Month 12","V8-Annual F/U - Year 2","Screening Visit",
"V4-Month 1","V5-Month 3","V6-Month 6","V7-Month 12",
"V8-Annual F/U - Year 2","Screening Visit")
)
# Relevant code
sample_data %>%
arrange(USUBJID, VISIT)
#> USUBJID QSSTRESC VISIT
#> 1 PCM204-101-840-01-01 3 Screening Visit
#> 2 PCM204-101-840-01-01 3 Screening Visit
#> 3 PCM204-101-840-01-01 2 Screening Visit
#> 4 PCM204-101-840-01-01 2 Screening Visit
#> 5 PCM204-101-840-01-01 3 Screening Visit
#> 6 PCM204-101-840-01-01 0 Screening Visit
#> 7 PCM204-101-840-01-01 2 V4-Month 1
#> 8 PCM204-101-840-01-01 4 V4-Month 1
#> 9 PCM204-101-840-01-01 2 V4-Month 1
#> 10 PCM204-101-840-01-01 3 V4-Month 1
#> 11 PCM204-101-840-01-01 2 V4-Month 1
#> 12 PCM204-101-840-01-01 1 V5-Month 3
#> 13 PCM204-101-840-01-01 2 V5-Month 3
#> 14 PCM204-101-840-01-01 1 V5-Month 3
#> 15 PCM204-101-840-01-01 3 V5-Month 3
#> 16 PCM204-101-840-01-01 1 V5-Month 3
#> 17 PCM204-101-840-01-01 2 V6-Month 6
#> 18 PCM204-101-840-01-01 2 V6-Month 6
#> 19 PCM204-101-840-01-01 1 V6-Month 6
#> 20 PCM204-101-840-01-01 1 V6-Month 6
#> 21 PCM204-101-840-01-01 1 V6-Month 6
#> 22 PCM204-101-840-01-01 1 V7-Month 12
#> 23 PCM204-101-840-01-01 3 V7-Month 12
#> 24 PCM204-101-840-01-01 1 V7-Month 12
#> 25 PCM204-101-840-01-01 2 V7-Month 12
#> 26 PCM204-101-840-01-01 2 V7-Month 12
#> 27 PCM204-101-840-01-01 4 V8-Annual F/U - Year 2
#> 28 PCM204-101-840-01-01 2 V8-Annual F/U - Year 2
#> 29 PCM204-101-840-01-01 2 V8-Annual F/U - Year 2
#> 30 PCM204-101-840-01-01 2 V8-Annual F/U - Year 2
#> 31 PCM204-101-840-01-01 2 V8-Annual F/U - Year 2
Created on 2021-03-14 by the reprex package (v1.0.0.9002)