[GRASS-user] random subset in R

Hi list,
I'm tryng to do a simple random subset of spatial points in R and don't know how....
I tried:

library(spgrass6)
hs=readVECT6("HSd01@Hot_Spot") (3500 point) #SpatialPointDataFrame
hs_smpl=spsample(hs, 200, "random") #->SpatialPoints

the question is... how do I attach the right data?
Thanks!

Leonardo Hardtke