> plot(ntyped(mapc, "mar"), ylab="No. typed individuals", main="No. genotypes by marker")
> mapc <- subset(mapc, ind=(ntyped(mapthis)>5))
Error in ntyped(mapthis) : object 'mapthis' not found
> mapc <- subset(mapc, ind=(ntyped(mapc)>5))
> nt.bymar <- ntyped(mapc, "mar")
> View(mapc)
> todrop <- names(nt.bymar[nt.bymar < 200])
> mapc <- drop.markers(mapc, todrop)
Error in drop.markers(mapc, todrop) :
You're attempting to drop *all* of the markers, which isn't allowed.