Closed shntnu closed 1 year ago
plate_new <- read_csv("../datasets/metadata/plate.csv.gz")
plate_new %>% count(Metadata_Source) %>% knitr::kable()
Metadata_Source | n |
---|---|
source_1 | 55 |
source_10 | 222 |
source_11 | 180 |
source_2 | 229 |
source_3 | 303 |
source_4 | 281 |
source_5 | 260 |
source_6 | 246 |
source_8 | 216 |
plate_new %>% filter(Metadata_Source == "source_1") %>% arrange(Metadata_Batch, Metadata_Plate) %>% knitr::kable()
Metadata_Source | Metadata_Batch | Metadata_Plate | Metadata_PlateType |
---|---|---|---|
source_1 | Batch1_20221004 | UL000109 | COMPOUND_EMPTY |
source_1 | Batch1_20221004 | UL001641 | COMPOUND |
source_1 | Batch1_20221004 | UL001643 | COMPOUND |
source_1 | Batch1_20221004 | UL001645 | COMPOUND |
source_1 | Batch1_20221004 | UL001651 | COMPOUND |
source_1 | Batch1_20221004 | UL001653 | COMPOUND |
source_1 | Batch1_20221004 | UL001655 | COMPOUND |
source_1 | Batch1_20221004 | UL001659 | COMPOUND_EMPTY |
source_1 | Batch1_20221004 | UL001661 | COMPOUND_EMPTY |
source_1 | Batch2_20221006 | UL001647 | COMPOUND |
source_1 | Batch2_20221006 | UL001649 | COMPOUND |
source_1 | Batch2_20221006 | UL001671 | COMPOUND |
source_1 | Batch2_20221006 | UL001673 | COMPOUND |
source_1 | Batch2_20221006 | UL001675 | COMPOUND |
source_1 | Batch2_20221006 | UL001677 | COMPOUND |
source_1 | Batch2_20221006 | UL001679 | COMPOUND |
source_1 | Batch3_20221010 | UL000087 | COMPOUND |
source_1 | Batch3_20221010 | UL000089 | COMPOUND |
source_1 | Batch3_20221010 | UL000091 | COMPOUND |
source_1 | Batch3_20221010 | UL001665 | COMPOUND |
source_1 | Batch3_20221010 | UL001667 | COMPOUND |
source_1 | Batch3_20221010 | UL001669 | COMPOUND |
source_1 | Batch3_20221010 | UL001785 | COMPOUND |
source_1 | Batch3_20221010 | UL001787 | COMPOUND |
source_1 | Batch4_20221012 | UL000081 | COMPOUND |
source_1 | Batch4_20221012 | UL000083 | COMPOUND |
source_1 | Batch4_20221012 | UL000093 | COMPOUND |
source_1 | Batch4_20221012 | UL000095 | COMPOUND |
source_1 | Batch4_20221012 | UL000097 | COMPOUND |
source_1 | Batch4_20221012 | UL001765 | COMPOUND |
source_1 | Batch4_20221012 | UL001769 | COMPOUND |
source_1 | Batch4_20221012 | UL001771 | COMPOUND |
source_1 | Batch5_20221030 | UL000561 | COMPOUND_EMPTY |
source_1 | Batch5_20221030 | UL001713 | COMPOUND |
source_1 | Batch5_20221030 | UL001719 | COMPOUND |
source_1 | Batch5_20221030 | UL001773 | COMPOUND |
source_1 | Batch5_20221030 | UL001781 | COMPOUND |
source_1 | Batch5_20221030 | UL001783 | COMPOUND |
source_1 | Batch5_20221030 | UL001791 | COMPOUND |
source_1 | Batch5_20221030 | UL001793 | COMPOUND |
source_1 | Batch5_20221030 | UL001795 | COMPOUND |
source_1 | Batch5_20221030 | UL001797 | COMPOUND |
source_1 | Batch5_20221030 | UL001799 | COMPOUND |
source_1 | Batch6_20221102 | UL000577 | COMPOUND |
source_1 | Batch6_20221102 | UL000579 | COMPOUND |
source_1 | Batch6_20221102 | UL000581 | COMPOUND |
source_1 | Batch6_20221102 | UL000583 | COMPOUND |
source_1 | Batch6_20221102 | UL000585 | COMPOUND |
source_1 | Batch6_20221102 | UL000587 | COMPOUND |
source_1 | Batch6_20221102 | UL000593 | COMPOUND |
source_1 | Batch6_20221102 | UL000595 | COMPOUND |
source_1 | Batch6_20221102 | UL000597 | COMPOUND |
source_1 | Batch6_20221102 | UL000599 | COMPOUND |
source_1 | Batch6_20221102 | UL001717 | COMPOUND |
source_1 | Batch6_20221102 | UL001789 | COMPOUND |
well %>% filter(Metadata_Source == "source_1") %>% count(Metadata_Plate, name = "n_wells") %>% count(n_wells, name = "n_plates") %>% knitr::kable()
n_wells | n_plates |
---|---|
1309 | 1 |
1355 | 1 |
1419 | 1 |
1467 | 1 |
1470 | 1 |
1471 | 7 |
1472 | 43 |
source_1
using https://github.com/jump-cellpainting/data-validation/pull/31 (although that specific PR is for updating the code forsource_11
)