sampledata <- check_sampledata(
Sample = wolf_samples$Sample,
Date = wolf_samples$Date,
AnimalRef = wolf_samples$AnimalRef,
GeneticSex = wolf_samples$GeneticSex,
lat = wolf_samples$lat,
lng = wolf_samples$lng,
SType = wolf_samples$SType
)
Run the code above in your browser using DataLab