R最初と最後の観測が設定

Question

I次のコードを持っている：

df1<-data.frame(rep(sample(1:100,5),4),(sample(seq(as.Date('2010/01/01'), as.Date('2016/01/01'), by="day"), 20)),rep("A",20)) 
names(df1)<-c("ID","Date","Letter") 
df2<-data.frame(df1$ID,(sample(seq(as.Date('2010/01/01'), as.Date('2016/01/01'), by="day"), 20)),rep("B",20)) 
names(df2)<-c("ID","Date","Letter") 
df3<-data.frame(df1$ID,(sample(seq(as.Date('2010/01/01'), as.Date('2016/01/01'), by="day"), 20)),rep("C",20)) 
names(df3)<-c("ID","Date","Letter") 
data<-rbind(df1,df2,df3) 

私は最初の日付と

したがって、各文字とIDのための最後の日付を見つけているやろうとしています結果は、第1カラムID、第2カラムレター、第3カラム第1オカレンスおよび第4カラム最後に出現する4列のデータフレームとなる。

どのような援助が

Answer 1

をいただければ幸いにこれを試してみてください：

MIN <- aggregate(Date~ID+Letter, data, min) 
MAX <- aggregate(Date~ID+Letter, data, max) 
d <- merge(MIN, MAX, by = c("ID", "Letter")) 

Answer 2

data.table

library(data.table) 
setDT(data)[, .(MINDate = min(Date), MAXDate = max(Date)), by = .(ID, Letter)]