To get rows where age is 20 - 25, inclusive, you would write
Data25 <-subset(Data,Age >= 20 & Age <= 25)
You might find the cut() function useful since you can set multiple break points and label all of the groups at once. The groups would remain in one data frame, which may or may not meet your needs.