counties<-data.frame(place=c("India", "London", "Singapore"),
                     population=c(983, 669, 595),
                     EU=c(TRUE, TRUE, FALSE))
print(counties)