This is kind of what I was thinking but not sure how to do it correctly
for (i in seq(0,180,by=5)){
nam <- paste("data", i, sep = "")
nam <- subset(data,Angle==i)
}
Essentially want it to be the equivalent of the code below but for all values from 0 to 180 in increments of 5
data0 <- subset(data,Angle==0)
data90 <- subset(data,Angle==90)
data180 <- subset(data,Angle==180)