Ho un dataframe come di seguito. Originariamente erano solo due colonne/variabili: "Timestamp" (che contiene data e ora) e "Attore". Ho rotto la variabile "Timestamp" in "Data" e "tempo" e poi "il tempo, più in basso in 'ore' e 'minuti'. Questo dà poi la seguente strutturaOrdinamento e classificazione di un dataframe per data e ora in r
dataf<-structure(list(hours = structure(c(3L, 4L, 4L, 3L, 3L, 3L, 6L,
6L, 6L, 6L, 6L, 2L, 2L, 2L, 2L, 5L, 5L, 5L, 1L, 1L, 2L, 2L), .Label = c("9",
"12", "14", "15", "16", "17"), class = "factor"), mins = structure(c(17L,
1L, 2L, 14L, 15L, 16L, 3L, 4L, 6L, 6L, 7L, 9L, 9L, 13L, 13L,
10L, 11L, 12L, 2L, 5L, 8L, 8L), .Label = c("00", "04", "08",
"09", "10", "12", "13", "18", "19", "20", "21", "22", "27", "39",
"51", "52", "59"), class = "factor"), date = structure(c(3L,
3L, 3L, 3L, 3L, 3L, 2L, 2L, 2L, 2L, 2L, 1L, 1L, 1L, 1L, 4L, 4L,
4L, 1L, 1L, 1L, 1L), .Label = c("4/28/2014", "5/18/2014", "5/2/2014",
"5/6/2014"), class = "factor"), time = structure(c(7L, 8L, 9L,
4L, 5L, 6L, 13L, 14L, 15L, 15L, 16L, 2L, 2L, 3L, 3L, 10L, 11L,
12L, 17L, 18L, 1L, 1L), .Label = c("12:18", "12:19", "12:27",
"14:39", "14:51", "14:52", "14:59", "15:00", "15:04", "16:20",
"16:21", "16:22", "17:08", "17:09", "17:12", "17:13", "9:04",
"9:10"), class = "factor"), Timestamp = structure(c(13L, 14L,
15L, 10L, 11L, 12L, 6L, 7L, 8L, 8L, 9L, 2L, 2L, 3L, 3L, 16L,
17L, 18L, 4L, 5L, 1L, 1L), .Label = c("4/28/2014 12:18", "4/28/2014 12:19",
"4/28/2014 12:27", "4/28/2014 9:04", "4/28/2014 9:10", "5/18/2014 17:08",
"5/18/2014 17:09", "5/18/2014 17:12", "5/18/2014 17:13", "5/2/2014 14:39",
"5/2/2014 14:51", "5/2/2014 14:52", "5/2/2014 14:59", "5/2/2014 15:00",
"5/2/2014 15:04", "5/6/2014 16:20", "5/6/2014 16:21", "5/6/2014 16:22"
), class = "factor"), Actor = c(7L, 7L, 7L, 7L, 7L, 7L, 5L, 5L,
2L, 12L, 2L, 7L, 7L, 7L, 7L, 10L, 10L, 10L, 7L, 10L, 7L, 7L)), .Names = c("hours",
"mins", "date", "time", "Timestamp", "Actor"), row.names = c(NA,
-22L), class = "data.frame")
La ragione per rompere il timestamp e le variabili temporali in variabili separate erano perché nei miei dati reali ho avuto molti problemi di ordinamento in base a dati e/o tempi. Rompendo queste variabili in parti più piccole ha reso molto più facile ordinare
Cosa vorrei mi piace fare ora è creare una nuova variabile chiamata "Classifica", che restituirebbe un "1" per il primo evento nel dataframe (che sarebbe l'osservazione alle 9.04 del 28 aprile 2014), quindi un "2" per la prossima osservazione in data/ora orde r e così via.
Ordinamento della dataframe sembra essere relativamente banale:
dataf<-dataf[order(as.Date(dataf$date, format="%m/%d/%Y"), dataf$hours, dataf$mins),]
Questo fa il lavoro. Ma quello con cui sto lottando è ora di assegnare ranghi.
ho provato questo, perché ho usato 'ave' in combinazione con FUN = rango di rango interi, ma ciò che produce è ridicolmente sbagliata:
dataf$rank <- ave((dataf[order(as.Date(dataf$date, format="%m/%d/%Y"), dataf$hours, dataf$mins),]),FUN=rank)
Qualsiasi aiuto apprezzato
Non è 'dataf $ rank <- rank (dataf $ Timestamp)' sufficiente? – sgibb
@sgibb L'OP ha reso la vita piuttosto difficile archiviando tutto come fattori, piuttosto che utilizzando oggetti data e datetime, per qualche motivo. E ci sono duplicati di data e ora, quindi non possiamo nemmeno fare un passo laterale a quel problema e dire di fare 'seq_len (nrow (dataf))'. – joran