readWorksheet 사용자 지정

Excel 파일을 열지 않고도 urbanpop.xlsx(보기)을 빠르게 훑어보려면 다음 코드를 실행하면 됩니다:

my_book <- loadWorkbook("urbanpop.xlsx")
sheets <- getSheets(my_book)
all <- lapply(sheets, readWorksheet, object = my_book)
str(all)

이제 1968, 1969, 1970년의 도시 인구 데이터에만 관심이 있다고 가정해 볼게요. 이 연도의 데이터는 두 번째 시트의 3, 4, 5열에 있습니다. 하지만 이 열만 선택하면 해당 수치가 어느 나라에 해당하는지 알 수 없게 됩니다.

두 번째 시트의 3, 4, 5열만 가져오도록 readWorksheet() 명령에 startCol과 endCol 인수를 추가하세요.
이제 urbanpop_sel에는 국가 정보가 없습니다. 두 번째 시트에서 첫 번째 열만 가져오는 또 다른 readWorksheet() 명령을 작성할 수 있을까요? 결과 데이터 프레임을 countries로 저장하세요.
cbind()를 사용해 countries와 urbanpop_sel을 이 순서대로 합치세요. 결과는 selection에 저장하세요.