R 根据自定义类别顺序删除行

# The order of my `class` variable is:
complete.cases <- c("Class_0_1","Class_1_3","Class_3_9", "Class_9_25","Class_25_50")   

# In my ds:
nest <- c(2,2,2,2,2,3,3,3,3)
TA <- c(2.3,5.9,8.7,11.8,14.9,11.9,8.8,5.7,2.4)
class <- c("Class_0_1","Class_1_3","Class_3_9","Class_3_9","Class_9_25","Class_1_3","Class_1_3","Class_1_3","Class_3_9")
my.ds <- data.frame(nest,TA,class)
my.ds
      nest   TA      class
1    2  2.3  Class_0_1
2    2  5.9  Class_1_3
3    2  8.7  Class_3_9
4    2 11.8  Class_3_9
5    2 14.9 Class_9_25
6    3 11.9  Class_1_3
7    3  8.8  Class_1_3
8    3  5.7  Class_1_3
9    3  2.4  Class_3_9

# About ds information:
nest <- c(2,3)
class_max <- c("Class_3_9","Class_1_3")
info.ds <- data.frame(nest,class_max)

现在我想要删除规则中的行，my.ds$class比info.ds$class_max按嵌套删除，如果不是可以的.

我的最终数据帧:必须是:

# new.ds
#   nest   TA      class
# 1    2  2.3  Class_0_1
# 2    2  5.9  Class_1_3
# 3    2  8.7  Class_3_9
# 4    2 11.8  Class_3_9
# 5    3 11.9  Class_1_3
# 6    3  8.8  Class_1_3
# 7    3  5.7  Class_1_3

拜托，有什么可以帮忙的吗？