# NOT RUN {
GDELT.subset.data <- GetGDELT("2013-06-01", "2013-06-07", allow.wildcards=TRUE,
filter=list(ActionGeo_CountryCode=c("AF", "US"), EventCode="14*"),
local.folder="~/gdeltdata")
GDELT.normed.data <- NormEventCounts(x = GDELT.subset.data,
unit.analysis="day",
var.name="protest")
# }
Run the code above in your browser using DataLab