Skip to content

Commit

Permalink
Added S02c
Browse files Browse the repository at this point in the history
  • Loading branch information
tractatus committed Sep 7, 2023
1 parent 851466d commit 7b1f5d3
Show file tree
Hide file tree
Showing 5 changed files with 39 additions and 0 deletions.
Binary file added pdf/S02c.pdf
Binary file not shown.
Binary file modified pdf/fig_S02_synthesis.pdf
Binary file not shown.
21 changes: 21 additions & 0 deletions supplementary_fig02.md
Original file line number Diff line number Diff line change
Expand Up @@ -515,3 +515,24 @@ for(i in seq_along(msSamples) ){
```

![](supplementary_fig02_files/figure-commonmark/unnamed-chunk-22-1.png)

Plot a figure:

``` r
# Set up a 2x1 layout for subplots
par(mfrow = c(2, 1), mar = c(3, 4, 1, 1))

# Plot the first sample data
ms.plot(msdata[msdata$sample == 'RXN488',], col = RColorBrewer::brewer.pal(6, 'PuOr')[2])
# Add label for the first sample
text(1700, 90, mylabels[2], col = RColorBrewer::brewer.pal(6, 'PuOr')[2])

# Reset the layout for the second subplot
par(mar = c(4, 4, 1, 1))
# Plot the second sample data
ms.plot(msdata[msdata$sample == 'RXN594',], col = RColorBrewer::brewer.pal(6, 'PuOr')[6])
# Add label for the second sample
text(1700, 90, mylabels[1], col = RColorBrewer::brewer.pal(6, 'PuOr')[6])
```

![](supplementary_fig02_files/figure-commonmark/unnamed-chunk-23-1.png)
18 changes: 18 additions & 0 deletions supplementary_fig02.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -305,3 +305,21 @@ for(i in seq_along(msSamples) ){
ms.plot(msdata[msdata$sample==msSamples[i],], main=msSamples[i], col=i)
}
```

Plot a figure:
```{r}
# Set up a 2x1 layout for subplots
par(mfrow = c(2, 1), mar = c(3, 4, 1, 1))
# Plot the first sample data
ms.plot(msdata[msdata$sample == 'RXN488',], col = RColorBrewer::brewer.pal(6, 'PuOr')[2])
# Add label for the first sample
text(1700, 90, mylabels[2], col = RColorBrewer::brewer.pal(6, 'PuOr')[2])
# Reset the layout for the second subplot
par(mar = c(4, 4, 1, 1))
# Plot the second sample data
ms.plot(msdata[msdata$sample == 'RXN594',], col = RColorBrewer::brewer.pal(6, 'PuOr')[6])
# Add label for the second sample
text(1700, 90, mylabels[1], col = RColorBrewer::brewer.pal(6, 'PuOr')[6])
```
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.

0 comments on commit 7b1f5d3

Please sign in to comment.