So what I did was make a partition of 40%-60%. The 40% worked, but not the 60%.
> dim(clean_reg)
[1] 497 23
> partition = sample(x = 1:497, size = .4*497, replace=F)
> dog = clean_reg[partition, ]
> cat = clean_reg[!partition, ]
> dim(dog)
[1] 198 23
> dim(cat)
[1] 0 23
Why didn't the remaining 60% go into cat? Doesn't ! sufficiently do that?