Advertisement ยท 728 ร— 90

Posts by Jan Broder Engler

library(tidyplots)

gene_expression |> 
  tidyplot(x = group, y = expression, color = group) |> 
  add_violin() |> 
  add_data_points_beeswarm(white_border = TRUE) |> 
  view_plot(data = filter_rows(external_gene_name == "Apol6"),
            title = "Apol6")

library(tidyplots) gene_expression |> tidyplot(x = group, y = expression, color = group) |> add_violin() |> add_data_points_beeswarm(white_border = TRUE) |> view_plot(data = filter_rows(external_gene_name == "Apol6"), title = "Apol6")

This is how you can preview a subset of the dataset in #tidyplots ๐Ÿ”Ž

#rstats #dataviz #phd

1 hour ago 3 1 0 0
Post image

This is how to get started with #tidyplots ๐Ÿš€

https://tidyplots.org/getstarted

#rstats #dataviz #phd

1 day ago 9 1 0 0
library(tidyplots)

# Define style
my_style <- function(x) x |>
  adjust_colors(colors_discrete_candy) |>
  adjust_font(family = "mono") |> 
  adjust_size(height = 30)

# Set global options
tidyplots_options(my_style = my_style)

study |>
  tidyplot(x = group, y = score, color = dose) |>
  add_mean_bar()

# Reset global options
tidyplots_options()

library(tidyplots) # Define style my_style <- function(x) x |> adjust_colors(colors_discrete_candy) |> adjust_font(family = "mono") |> adjust_size(height = 30) # Set global options tidyplots_options(my_style = my_style) study |> tidyplot(x = group, y = score, color = dose) |> add_mean_bar() # Reset global options tidyplots_options()

This is how you can set a default style in #tidyplots ๐ŸŽจ

jbengler.github.io/tidyplots/reference/tidy...

#rstats #dataviz #phd

2 days ago 6 0 0 0
Video

Started work on my first data product. Currently a #wip, it's a tutorial/course/walkthrough around running Linear Regressions. These are sample charts generated using #Tidyplots working with a special dataset.

Looking forward to sharing this once it's done.
#DataViz #RStats #DataScience

2 weeks ago 6 2 0 0
Post image

If you regularly create visualizations in R, the tidyplots package is worth exploring.

The figure below shows examples from the tidyplots website: tidyplots.org

I recently released a new Statistics Globe Hub module about tidyplots: statisticsglobe.com/hub

#rstats #datascience #tidyverse

2 weeks ago 7 2 0 0

Go try it ๐Ÿคฉ

2 days ago 1 0 0 0
Video

Some progress on the model exploration visuals using #tidyplots. Patterns are starting to lock in.

#dataviz #ggplot2 #rstats

4 days ago 4 2 0 0
Post image

Here are some #tidyplots use cases for bioinformatics ๐Ÿ”ฅ

Complete with data and code ๐Ÿš€

https://tidyplots.org/use-cases/#bioinformatics

#rstats #dataviz #phd

3 days ago 12 1 0 1
library(tidyplots)

spendings |> 
  tidyplot(x = category, y = amount, color = category) |> 
  add_sum_bar() |> 
  adjust_x_axis(rotate_labels = TRUE) |> 
  sort_x_axis_levels() |> 
  adjust_colors(new_colors = colors_discrete_candy)

library(tidyplots) spendings |> tidyplot(x = category, y = amount, color = category) |> add_sum_bar() |> adjust_x_axis(rotate_labels = TRUE) |> sort_x_axis_levels() |> adjust_colors(new_colors = colors_discrete_candy)

This is how you can change the color scheme in #tidyplots ๐ŸŒˆ

#rstats #dataviz #phd

4 days ago 6 1 0 0

๐Ÿš€

4 days ago 0 0 0 0
Advertisement
Post image

Thanks for the opportunity to speak at the RNVSU March Meetup ๐Ÿ™

Is was great to see so many people interested in #tidyplots ๐Ÿ˜

Talk slides can be found here: github.com/jbengler/tid...

Best wishes!

#rstats #dataviz #phd

4 days ago 12 2 1 0
library(tidyheatmaps)

tidyheatmap(df = data_exprs,
            rows = external_gene_name,
            columns = sample,
            values = expression,
            scale = "row",
            annotation_col = c(sample_type, condition, group),
            annotation_row = c(is_immune_gene, direction),
            gaps_row = direction,
            gaps_col = group
)

library(tidyheatmaps) tidyheatmap(df = data_exprs, rows = external_gene_name, columns = sample, values = expression, scale = "row", annotation_col = c(sample_type, condition, group), annotation_row = c(is_immune_gene, direction), gaps_row = direction, gaps_col = group )

This is how you can visualize gene expression data in #tidyheatmaps ๐Ÿคฉ

https://jbengler.github.io/tidyheatmaps/

#rstats #dataviz #phd

5 days ago 12 3 0 0

I have also been there ๐Ÿ˜‚

5 days ago 1 0 0 0

Thanks a lot!

5 days ago 1 0 0 0

Nooo, you cannot do that ๐Ÿ˜‚

5 days ago 1 0 0 0
Post image

Github star number 666 for #tidyplots ๐Ÿ˜ˆ

github.com/jbengler/tid...

#rstats #dataviz #phd

5 days ago 16 1 2 0
Post image

Tomorrow I will give a talk about "Tidyplots for easy data visualization" ๐Ÿ“ฃ

We will explore the concept behind tidyplots, walk through its available functions, and dive into live coding on common plotting tasks.

www.meetup.com/r-nvsu/event...

#rstats #dataviz #phd

5 days ago 4 2 0 0

pak is a package manger that installs the package version into your library thereby affecting all of your projects.

Thus, it really depends what you are looking for.

5 days ago 1 0 1 0
Advertisement

Great to hear that you enjoy my posts! I always try to include code in the image alt text to make it easy to copy and paste.

However, it might be that sometimes a post without alt text slips through.

5 days ago 0 0 0 0

Yes, that is right! Thank you for pointing out.

5 days ago 0 0 0 0

Package versions in renv are linked to your project, so you can use different versions across your projects without one affecting the other. This is great for isolation, portability and reproducibility.

5 days ago 2 0 1 0
library(pak)

# install the latest CRAN release
pak("tidyplots")

# install the development version
pak("jbengler/tidyplots")

# install a specific version
pak("jbengler/tidyplots@v0.0.1")

# install a specific commit
pak("jbengler/tidyplots@9f7294a")

library(pak) # install the latest CRAN release pak("tidyplots") # install the development version pak("jbengler/tidyplots") # install a specific version pak("jbengler/tidyplots@v0.0.1") # install a specific commit pak("jbengler/tidyplots@9f7294a")

This is how you can install a specific version of a package ๐Ÿค“

In these cases ๐Ÿ“ฆ pak.r-lib.org comes in very handy

#rstats #dataviz #phd

6 days ago 19 3 2 0
library(tidyplots)

spendings |> 
  tidyplot(x = category, y = amount, color = category) |> 
  add_sum_bar() |> 
  adjust_x_axis(rotate_labels = TRUE) |> 
  sort_x_axis_levels() |> 
  adjust_colors(new_colors = c("Health" = "#ff3b30"),
                na.value = "lightgrey")

library(tidyplots) spendings |> tidyplot(x = category, y = amount, color = category) |> add_sum_bar() |> adjust_x_axis(rotate_labels = TRUE) |> sort_x_axis_levels() |> adjust_colors(new_colors = c("Health" = "#ff3b30"), na.value = "lightgrey")

This is how you can guide attention in #tidyplots ๐ŸŽฏ

#rstats #dataviz #phd

1 week ago 19 3 1 1
Post image

This is how you can use plotmath expressions in #tidyplots ๐Ÿค“

jbengler.github.io/tidyplots/articles/Advan...

#rstats #dataviz #phd

1 week ago 24 4 0 0

Yes, I also find this a tough one. Often times the most engaging color schemes are not particularly color deficiency friendly.

1 week ago 0 0 0 0
Post image

All key features at a glance โ€“ with the #tidyplots cheatsheet ๐Ÿคฉ

https://tidyplots.org/cheatsheet

#rstats #dataviz #phd

1 week ago 25 4 0 1

I still have to implement ggpubr::stat_pvalue_manual().
It is on the list.

1 week ago 1 0 0 0
library(tidyplots)

study |>
  tidyplot(x = treatment, y = score, color = treatment) |>
  add_mean_dash() |>
  add_sem_errorbar() |>
  add_data_points() |>
  add_test_pvalue(comparisons = list(c(1,3),c(2,4)))

library(tidyplots) study |> tidyplot(x = treatment, y = score, color = treatment) |> add_mean_dash() |> add_sem_errorbar() |> add_data_points() |> add_test_pvalue(comparisons = list(c(1,3),c(2,4)))

This is how you can test selected comparisons in #tidyplots ๐Ÿ“‹

#rstats #dataviz #phd

1 week ago 11 3 1 0
Advertisement

The main scheme "friendly" is a variation of the original Okabe & Ito 2008 scheme that was optimized for color vision deficiency:

jfly.uni-koeln.de/color/

The other schemes are basically a random bunch I found esthetically pleasing but are not selected for being color vision friendly.

1 week ago 1 0 1 0
library(tidyplots)

study |> 
  tidyplot(x = treatment, y = score, color = treatment) |> 
  add_violin() |> 
  add_data_points_beeswarm(white_border = TRUE) |> 
  rename_x_axis_levels(new_names = c(
    "A" = "Dog",
    "B" = "Cat",
    "C" = "Hamster",
    "D" = "Dinosaur"))

library(tidyplots) study |> tidyplot(x = treatment, y = score, color = treatment) |> add_violin() |> add_data_points_beeswarm(white_border = TRUE) |> rename_x_axis_levels(new_names = c( "A" = "Dog", "B" = "Cat", "C" = "Hamster", "D" = "Dinosaur"))

This is how you can rename axis levels in #tidyplots ๐ŸŽ‰

#rstats #dataviz #phd

1 week ago 8 2 0 0