Get information about a single sample

api_sample(sample_id)

Arguments

sample_id

internal, numeric id of the sample.

Value

A nested list with the properties of the sample.

Examples

info <- api_sample(15709) str(info)
#> List of 7 #> $ sampleid : int 15709 #> $ projid : int 185 #> $ orig_id : chr "wp220160223" #> $ latitude : num 43.7 #> $ longitude : num 7.32 #> $ dataportal_descriptor: chr "<bioimagingdescriptors><bioimagingdescriptor domain=\"bio-imaging\" trait=\"automated imaging modalities\" desc"| __truncated__ #> $ free_columns :List of 27 #> ..$ scan_operator : chr "corinne desnos" #> ..$ ship : chr "sagitta" #> ..$ program : chr "zooscan" #> ..$ stationid : chr "ptb" #> ..$ bottomdepth : chr "85" #> ..$ ctdrosettefilename: chr "ctdref" #> ..$ other_ref : chr "i14" #> ..$ tow_nb : chr "1" #> ..$ tow_type : chr "3" #> ..$ net_type : chr "wp2" #> ..$ net_mesh : chr "200" #> ..$ net_surf : chr "0.25" #> ..$ zmax : chr "75" #> ..$ zmin : chr "0" #> ..$ tot_vol : chr "18.75" #> ..$ comment : NULL #> ..$ tot_vol_qc : chr "2" #> ..$ depth_qc : chr "3" #> ..$ sample_qc : chr "1111" #> ..$ barcode : chr "ptb016054wp1" #> ..$ duration : chr "99999" #> ..$ ship_speed : chr "99999" #> ..$ cable_length : chr "99999" #> ..$ cable_angle : chr "99999" #> ..$ cable_speed : chr "99999" #> ..$ nb_jar : chr "1" #> ..$ open : NULL