# Assuming a user has selected different columns as separated data tables
# and later on would like to combine them as one for further processing.
data1 <- rtry_select_col(data_TRY_15160,
ObsDataID, ObservationID, AccSpeciesID, AccSpeciesName, ValueKindName,
TraitID, TraitName, DataID, DataName, OrigObsDataID, ErrorRisk, Comment)
data2 <- rtry_select_col(data_TRY_15160,
OriglName, OrigValueStr, OrigUnitStr, StdValue, UnitName)
data <- rtry_bind_col(data1, data2)
# Expected messages:
# dim: 1782 12
# col: ObsDataID ObservationID AccSpeciesID AccSpeciesName ValueKindName TraitID
# TraitName DataID DataName OrigObsDataID ErrorRisk Comment
#
# dim: 1782 5
# col: OriglName OrigValueStr OrigUnitStr StdValue UnitName
#
# dim: 1782 17
# col: ObsDataID ObservationID AccSpeciesID AccSpeciesName ValueKindName TraitID
# TraitName DataID DataName OrigObsDataID ErrorRisk Comment OriglName
# OrigValueStr OrigUnitStr StdValue UnitName
Run the code above in your browser using DataLab