Skip to content

Commit

Permalink
update pasilla
Browse files Browse the repository at this point in the history
Merge branch 'master' into write-paper

# Please enter a commit message to explain why this merge is necessary,
# especially if it merges an updated upstream into a topic branch.
#
# Lines starting with '#' will be ignored, and an empty message aborts
# the commit.
  • Loading branch information
stemangiola committed Jul 8, 2020
2 parents 92d83bc + 3910569 commit 2ffc7d3
Show file tree
Hide file tree
Showing 3 changed files with 5 additions and 4 deletions.
2 changes: 1 addition & 1 deletion DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
Type: Package
Package: tidyHeatmap
Title: A Tidy Implementation of Heatmap
Version: 1.0.1
Version: 1.1.0
Authors@R:
person(given = "Stefano",
family = "Mangiola",
Expand Down
2 changes: 1 addition & 1 deletion paper/paper.md
Original file line number Diff line number Diff line change
Expand Up @@ -58,7 +58,7 @@ my_heatmap =

# Grouping
input_df %>%
group_by(location) %>%
group_by(pathway) %>%

# Plotting
heatmap(feature, element, value) %>%
Expand Down
5 changes: 3 additions & 2 deletions paper/paper_tables_and_figures.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -19,12 +19,13 @@ pasilla_plus =
dplyr::mutate(size = rnorm(n(), 4,0.5)) %>%
dplyr::mutate(age = runif(n(), 50, 200)) %>%
tidyr::unnest(data) %>%
rename(count = `count normalised adjusted`)
dplyr::rename(count = `count normalised adjusted`) %>%
dplyr::mutate(pathway = if_else(location == "Secretory", "cluster 1", "cluster 2"))
```

```{r example_figure}
pasilla_plus %>%
group_by(location) %>%
group_by(pathway) %>%
heatmap( symbol, sample, count ) %>%
add_tile(condition) %>%
add_point(activation) %>%
Expand Down

0 comments on commit 2ffc7d3

Please sign in to comment.