宿題/宿題をしているときに問題が発生しました。誰かが喜んで助けてくれるなら、あなたの専門知識に感謝します:)
raceIDs というファイルがあります (次のようになります):
> raceIDs
[1] "GER" "SUI" "NZ2" "US1" "US2" "POR" "FRA" "AUS" "NZ1" "SWE"
次の関数も作成しました。
getTimes()
たとえば、次のように入力します。
> getTimes("GER")
[1] "11:10:02" "11:35:05" #Shows the starting and finishing times
ここで行う必要があるのは、すべての国の開始時刻と終了時刻を示すマトリックスを作成することです。
たとえば、次の結果のマトリックスを取得する必要があります。
> raceTimes
start finish
GER "11:10:02" "11:35:05"
SUI "11:10:02" "11:35:22"
#and so on....
私の試み：
> GER <- getTimes("GER")
> SUI <- getTimes("SUI")
> NZ2 <- getTimes("NZ2")
> US1 <- getTimes("US1")
> US2 <- getTimes("US2")
> POR <- getTimes("POR")
> FRA <- getTimes("FRA")
> AUS <- getTimes("AUS")
> NZ1 <- getTimes("NZ1")
> SWE <- getTimes("SWE")
> allTimes<-c(GER, SUI, NZ2, US1, US2, POR, FRA, AUS, NZ1, SWE)
> raceTimes <- matrix(allTimes, ncol=2)
> rownames(raceTimes) <- paste(raceIDs)
> colnames(raceTimes) <- c("start", "finish")
> raceTimes
start finish
GER "11:10:02" "11:10:02"
SUI "11:35:05" "11:34:31"
NZ2 "11:10:02" "11:10:02"
US1 "11:35:22" "11:34:45"
US2 "11:10:02" "11:10:03"
POR "11:34:12" "11:36:48"
FRA "11:10:01" "11:10:01"
AUS "11:33:29" "11:35:16"
NZ1 "11:10:01" "11:10:03"
SWE "11:36:05" "11:35:08"
上記のように、私のマトリックスは正しくありません。たとえば、「GER」の終了結果 (「11:35:05」) は、「SUI」の開始時間として表示されます。
何か提案はありますか？