Transform se into raw_data
Examples
mae <- gDRutils::get_synthetic_data("finalMAE_small")
se <- mae[[1]]
convert_se_to_raw_data(se)
#> Barcode Concentration BackgroundValue record_id masked ReadoutValue
#> <char> <num> <num> <int> <lgcl> <num>
#> 1: plate_1 0.001000000 0 601 FALSE 93.5
#> 2: plate_1 0.003162278 0 901 FALSE 74.8
#> 3: plate_1 0.010000000 0 1201 FALSE 40.1
#> 4: plate_1 0.031622777 0 1501 FALSE 33.2
#> 5: plate_1 0.100000000 0 1801 FALSE 31.5
#> ---
#> 8696: plate_2 0.000000000 0 110 FALSE 104.0
#> 8697: plate_2 0.000000000 0 190 FALSE 104.1
#> 8698: plate_1 0.000000000 0 80 FALSE 104.4
#> 8699: plate_3 0.000000000 0 560 FALSE 104.6
#> 8700: plate_3 0.000000000 0 570 FALSE 104.7
#> Gnumber DrugName drug_moa Duration clid CellLineName Tissue
#> <char> <char> <char> <num> <char> <char> <char>
#> 1: G00002 drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 2: G00002 drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 3: G00002 drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 4: G00002 drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 5: G00002 drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> ---
#> 8696: vehicle vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8697: vehicle vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8698: vehicle vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8699: vehicle vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8700: vehicle vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> ReferenceDivisionTime
#> <num>
#> 1: 26
#> 2: 26
#> 3: 26
#> 4: 26
#> 5: 26
#> ---
#> 8696: 62
#> 8697: 62
#> 8698: 62
#> 8699: 62
#> 8700: 62