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 ReadoutValue Gnumber
#> <char> <num> <num> <int> <num> <char>
#> 1: plate_1 0.001000000 0 601 93.5 G00002
#> 2: plate_2 0.001000000 0 701 92.0 G00002
#> 3: plate_3 0.001000000 0 801 91.2 G00002
#> 4: plate_1 0.003162278 0 901 74.8 G00002
#> 5: plate_2 0.003162278 0 1001 74.3 G00002
#> ---
#> 8696: plate_3 0.000000000 0 560 104.6 vehicle
#> 8697: plate_3 0.000000000 0 570 104.7 vehicle
#> 8698: plate_3 0.000000000 0 580 98.9 vehicle
#> 8699: plate_3 0.000000000 0 590 98.9 vehicle
#> 8700: plate_3 0.000000000 0 600 100.1 vehicle
#> DrugName drug_moa Duration clid CellLineName Tissue
#> <char> <char> <num> <char> <char> <char>
#> 1: drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 2: drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 3: drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 4: drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> 5: drug_002 moa_A 72 CL00011 cellline_BA tissue_x
#> ---
#> 8696: vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8697: vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8698: vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8699: vehicle vehicle 72 CL00020 cellline_KB tissue_z
#> 8700: 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