# Remove certain columns from the provided sample data (data_TRY_15160)
data_rm_col <- rtry_remove_col(data_TRY_15160,
LastName, FirstName, DatasetID, Dataset, SpeciesName,
OrigUncertaintyStr, UncertaintyName, Replicates,
RelUncertaintyPercent, Reference, V28)
# Expected message:
# dim: 1782 17
# col: AccSpeciesID AccSpeciesName ObservationID ObsDataID TraitID TraitName
# DataID DataName OriglName OrigValueStr OrigUnitStr ValueKindName
# StdValue UnitName OrigObsDataID ErrorRisk Comment
Run the code above in your browser using DataLab