Jordi Rosell

@jrosell.bsky.social

833 Followers 1690 Following

Data analyst and business consultant #ecommerce #cro #rstats #bi #etl Aiguafreda, Barcelona. Ich lerne Deutsch. @jrosell@mastodon.social

replicate(n=5, simplify = FALSE, {
runif(2)+1
})
# [[1]]
# [1] 1.083356 1.107121

# [[2]]
# [1] 1.577004 1.515670

# [[3]]
# [1] 1.879080 1.011259

# [[4]]
# [1] 1.895873 1.096743

# [[5]]
# [1] 1.664607 1.332716

Tutorials, how to guides, discussions, reference

Balanç de blancs

Cafe en gra a amazon.

p1 <- ggplot(diamonds, aes(carat)) + geom_histogram(bins=200, alpha=0.3)
p2 <- ggplot(diamonds, aes(carat)) + geom_histogram(bins=50, alpha=0.3)
p3 <- ggplot(diamonds, aes(carat)) +
lapply(c(50,200), function(b) geom_histogram(bins=b, alpha=0.3))
p4 <- ggplot(diamonds, aes(carat, y = after_stat(count/width))) +
lapply(c(50,200), function(b) geom_histogram(bins=b, alpha=0.3))
p5 <- ggplot(diamonds, aes(carat, y = after_stat(density))) +
lapply(c(50,200), function(b) geom_histogram(bins=b, alpha=0.3))
p6 <- ggplot(diamonds, aes(carat)) + geom_density()

library(patchwork)
p1 / p2 / p3 / p4 / p5 / p6

p1 <- ggplot(diamonds, aes(carat, y = after_stat(count / width))) + geom_histogram(bins=200, alpha=0.3)
p2 <- ggplot(diamonds, aes(carat, y = after_stat(count / width))) + geom_histogram(bins=50, alpha=0.3)
p3 <- ggplot(diamonds, aes(carat, y = after_stat(count / width))) +
lapply(c(50,200), function(b) geom_histogram(bins=b, alpha=0.3))

library(patchwork)
p1 / p2 / p3

p1 <- ggplot(diamonds, aes(carat)) + geom_histogram(bins=200, alpha=0.3) + ylim(c(0,10000))
p2 <- ggplot(diamonds, aes(carat)) + geom_histogram(bins=50, alpha=0.3)
p3 <- ggplot(diamonds, aes(carat)) +
lapply(c(50,200), function(b) geom_histogram(bins=b, alpha=0.3))

library(patchwork)
p1 / p2 / p3