Ich habe folgende Dummy-Daten:

library(dplyr)
library(tidyr)
library(reshape2)
dt <- expand.grid(Year = 1990:2014, Product=LETTERS[1:8], Country = paste0(LETTERS, "I")) %>%   select(Product, Country, Year)
dt$value <- rnorm(nrow(dt))

Ich wähle zwei Produkt-Land-Kombinationen

sdt <- dt %>% filter((Product == "A" & Country == "AI") | (Product == "B" & Country =="EI"))

und ich möchte die Werte für jede Kombination nebeneinander sehen. Ich kann das mit machendcast:

sdt %>% dcast(Year ~ Product + Country)

Ist es möglich, dies mit zu tunspread aus dem Pakettidyr?