如何从数据ToothGrowth
创建子集 len supp dose
1 4.2 VC 0.5
2 11.5 VC 0.5
3 7.3 VC 0.5
...
29 23.3 VC 2.0
30 29.5 VC 2.0
31 15.2 OJ 0.5
32 21.5 OJ 0.5
. . .
58 27.3 OJ 2.0
59 29.4 OJ 2.0
60 23.0 OJ 2.0
通过选择剂量补充类型（supp）为OJ的所有记录并将它们分配给变量ans？
我试过了：
ans <- ToothGrowth[ToothGrowth$supp=="OJ"]
和此：
ans <- ToothGrowth[ToothGrowth$supp=="OJ",]
但显然这些都不正确。
我真的很感激你的建议。