Skip to content

Commit

Permalink
minor changes to README.Rmd
Browse files Browse the repository at this point in the history
  • Loading branch information
samabs committed Aug 18, 2018
1 parent fe2b2cf commit cc79164
Show file tree
Hide file tree
Showing 2 changed files with 14 additions and 23 deletions.
2 changes: 1 addition & 1 deletion README.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -118,7 +118,7 @@ sample_types

The column `Control` is `1` if the sample is a control and `0` otherwise.

```{r}
```{r, eval=FALSE}
fit_data = fit_controls(analysis_path=analysis_path,
counts = filtered_counts,
sample_types=sample_types,
Expand Down
35 changes: 13 additions & 22 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,6 @@ Installation
------------

``` r
# Obtain the development version of conliga from Github
# install.packages("devtools")
devtools::install_github("samabs/conliga")
```
Expand All @@ -31,7 +30,7 @@ The typical workflow:
Example
-------

Let's go through an example using the data from the paper.
Let's go through an example using the count data from the paper.

### Set-up

Expand Down Expand Up @@ -174,6 +173,10 @@ cytoband_file = system.file("extdata",
cytoband = read_cytobands(cytoband_file,
chr_order=chromosomes)

# alternatively get cytoband information by querying UCSC
# cytoband = get_cytobands(genome="hg38",
# chr_order=chromosomes)

cytoband
#> # A tibble: 811 x 5
#> chr start end name stain
Expand All @@ -189,10 +192,6 @@ cytoband
#> 9 chr1 23600000 27600000 p36.11 gneg
#> 10 chr1 27600000 29900000 p35.3 gpos25
#> # ... with 801 more rows
# alternatively get cytoband information by querying UCSC

# cytoband = get_cytobands(genome="hg38",
# chr_order=chromosomes)

# we need to state our priors in the following format
priors_file = system.file("extdata",
Expand Down Expand Up @@ -252,25 +251,17 @@ Note that we have fixed the hyperparameter gamma to 1. The other hyperparameters

### Processing the MCMC chains and obtaining results with `process_MCMC()`

Now we process the MCMC using the the `process_MCMC` function. Here we have selected to burn the first 5000 iterations.
Now we process the MCMC using the the `process_MCMC` function. Here we have selected to burn the first 10000 iterations.

``` r

burn_in = 5000

# samples %>% purrr::map(~process_MCMC(analysis_path=analysis_path,
# sample_name=.x,
# run_data=fit_data$run_data,
# loci_means=fit_data$map_means,
# cytoband=cytoband,
# burn_in=burn_in))

samples %>% purrr::map(~process_MCMC(analysis_path=analysis_path,
sample_name=.x,
run_data=fit_data$run_data,
loci_means=fit_data$map_means,
cytoband=cytoband,
burn_in=burn_in))
burn_in = 10000

samples_to_run %>% purrr::map(~process_MCMC(analysis_path=analysis_path,
sample_name=.x,
fit_data=fit_data,
cytoband=cytoband,
burn_in=burn_in))
```

This function saves the inferred relative copy number calls to `analysis_path/results/sample_name/sample_name.tsv` and provides a number of basic plots under `analysis_path/results/sample_name/standard_plots/`.
Expand Down

0 comments on commit cc79164

Please sign in to comment.