rbind(head(supercell_expression_matrix, n = 3), tail(supercell_expression_matrix, n = 3))
-#> Marker_1 Marker_2 Marker_3 Marker_4 Marker_5 Marker_6 Marker_7 Marker_8
-#> 1: 6.500549 10.04351 6.917036 9.754944 17.49099 12.47481 6.755746 14.99223
-#> 2: 6.219941 11.13442 4.471067 8.882971 18.96532 13.73045 6.488840 13.78131
-#> 3: 8.237611 11.50332 6.627568 8.507735 15.10083 14.65808 7.313123 14.58984
-#> 4: 8.406849 13.21608 14.083744 5.125704 15.79521 13.75427 12.986377 18.56063
-#> 5: 7.946571 12.70798 14.067321 8.803080 15.05481 13.42700 13.735859 21.44997
-#> 6: 9.128595 11.18219 12.629981 6.711764 16.48079 15.20647 14.924023 19.48714
-#> Marker_9 Marker_10 Sample SuperCellId
-#> 1: 13.450022 10.328687 Sample_1 SuperCell_1_Sample_Sample_1
-#> 2: 11.831775 11.541301 Sample_1 SuperCell_2_Sample_Sample_1
-#> 3: 11.869873 12.023383 Sample_1 SuperCell_3_Sample_Sample_1
-#> 4: 8.369949 7.195550 Sample_2 SuperCell_498_Sample_Sample_2
-#> 5: 6.666370 7.260202 Sample_2 SuperCell_499_Sample_Sample_2
-#> 6: 7.481778 6.322925 Sample_2 SuperCell_500_Sample_Sample_2
+
rbind(head(supercell_cell_map, n = 3), tail(supercell_cell_map, n = 3))
#> SuperCellID CellId Sample
-#> 1: SuperCell_256_Sample_Sample_1 Cell_1 Sample_1
-#> 2: SuperCell_77_Sample_Sample_1 Cell_2 Sample_1
-#> 3: SuperCell_421_Sample_Sample_1 Cell_3 Sample_1
-#> 4: SuperCell_23_Sample_Sample_2 Cell_19998 Sample_2
-#> 5: SuperCell_98_Sample_Sample_2 Cell_19999 Sample_2
-#> 6: SuperCell_227_Sample_Sample_2 Cell_20000 Sample_2
+