Fügen Sie einen Tag zu jedem Datum in einem Tag Vektor

Ich habe einen Vektor von Datumsangaben KeyDates mit zwei Schlüsseldaten. Ich möchte einen neuen Vektor von Datumsangaben namens KeyDatesPlus erstellen, der diese beiden Schlüsseldaten und die beiden folgenden Tage in chronologischer Reihenfolge enthält.Fügen Sie einen Tag zu jedem Datum in einem Tag Vektor

KeyDates <- structure(c(15159,15165), class = "Date") 

#KeyDates Output: 
[1] "2011-07-04" "2011-07-10" 

#desired output for KeyDatesPlus: 
[1] "2011-07-04" "2011-07-05" "2011-07-10" "2011-07-11"

Wie konnte ich das erreichen? Vielen Dank.

Quelle

2016-04-23 Krug

sort(c(KeyDates, KeyDates + 1)) 
[1] "2011-07-04" "2011-07-05" "2011-07-10" "2011-07-11"

Quelle

2016-04-23 21:16:45

KeyDates <- structure(c(15159,15165), class = "Date") 
KeyDatesPlus <- KeyDates+1 
KeyDatesPlus <- sort(unique(c(KeyDates, KeyDatesPlus)))

Quelle

2016-04-23 21:18:56 dww

Viele ähnliche Antwort erschien gleichzeitig. Ich werde meine aufheben, da es das einzige ist, das einzigartig enthält, was erforderlich sein könnte, wenn zwei Daten in der ursprünglichen Liste fortlaufend sind – dww

structure(sapply(KeyDates, "+", (0:1)), class = "Date") 
[1] "2011-07-04" "2011-07-05" "2011-07-10" "2011-07-11"

Oder:

as.Date(sapply(KeyDates, "+", (0:1))) 
[1] "2011-07-04" "2011-07-05" "2011-07-10" "2011-07-11"

Quelle

2016-04-23 21:19:05

Haben Sie versucht: 'KeyDates + (0: 1)'? Auch mit 'mapply', das das Herzstück von Vectorize bildet, wurden möglicherweise nützliche Ergebnisse erzielt, aber es sah sogar hackieriger aus als mein sapply Ansatz. Ich habe (erfolglos) versucht, etwas zu finden, das das Cartesion-Produkt von Argumenten lieferte, aber das Klassenattribut nicht fallen ließ. –

Rechts. Aber ich habe nach etwas gesucht, was nicht irgendwie nötig war. Unterschiedliche Ästhetik, denke ich. –

Ok, dann. Ich denke, ich verstehe deinen Standpunkt. –

KeyDates <- structure(c(15159,15165), class = "Date") 
KeyDates.plus <- as.Date(sapply(KeyDates, function(x) c(x, x+1)))

Quelle

2016-04-23 21:20:23

Fügen Sie einen Tag zu jedem Datum in einem Tag Vektor

Antwort

Verwandte Themen