Get metadata.
Examples
x <- randomWeb(10)
metadata(x)
#> sample_id repeated group_ab subtype score_a
#> anansi_ID_sample_1_1 sample_1 rep_1 b y -1.16541048
#> anansi_ID_sample_2_1 sample_2 rep_1 b x 0.71695972
#> anansi_ID_sample_3_1 sample_3 rep_1 b x 1.29189407
#> anansi_ID_sample_4_1 sample_4 rep_1 b y -0.51504133
#> anansi_ID_sample_5_1 sample_5 rep_1 a y 2.43037191
#> anansi_ID_sample_6_1 sample_6 rep_1 a z 0.41935991
#> anansi_ID_sample_7_1 sample_7 rep_1 b y -1.44157925
#> anansi_ID_sample_8_1 sample_8 rep_1 a x 1.68659471
#> anansi_ID_sample_9_1 sample_9 rep_1 a x 0.05354718
#> anansi_ID_sample_10_1 sample_10 rep_1 b y 0.70716527
#> score_b score_c
#> anansi_ID_sample_1_1 0.3478214 0.1509279
#> anansi_ID_sample_2_1 0.3013378 0.4105076
#> anansi_ID_sample_3_1 -1.2597793 -1.1472122
#> anansi_ID_sample_4_1 0.6805867 -0.4645211
#> anansi_ID_sample_5_1 -0.3419171 -0.6460391
#> anansi_ID_sample_6_1 -0.8711827 -1.1452566
#> anansi_ID_sample_7_1 -1.0709012 0.4668527
#> anansi_ID_sample_8_1 -0.2419871 -1.7542432
#> anansi_ID_sample_9_1 -0.1581620 -0.4126945
#> anansi_ID_sample_10_1 -0.8278015 0.4029651