Mankka's questions

Estou usando o coord_radialdo ggplot2, mas não consigo fazer os limites do eixo corretos. A estética x (neste caso theta) é um fator e y (r) é um número. Quero que o primeiro nível do fator esteja exatamente em 12 (norte) e os outros níveis sejam distribuídos uniformemente. No exemplo abaixo, a lacuna entre o primeiro e o último nível (A e D) é maior do que as outras lacunas. Entre outras coisas, tentei usar scale_x_discretee expand. Abaixo está um exemplo mínimo, mas meu caso real tem 15 níveis.

library(dplyr)
library(ggplot2)

tibble(lab = c("A", "B", "C", "D"),
       val = rexp(4)) %>%
  ggplot(aes(lab, val, group = 1)) +
  geom_line() +
  coord_radial(r.axis.inside = TRUE)

Tenho um data frame que contém medições para vários grupos. Quero aplicar outera cada par de grupos e calcular um resumo. Isso pode ser feito no estilo Tidyverse? Abaixo está um exemplo de como fazer isso com dois loops. Eu brinquei com expand_gride group_by, mas sem sucesso.

df <- iris
groups = as.character(levels(df$Species))
n <- length(groups)
out <- matrix(numeric(n*n), nrow = n, ncol = n)
colnames(out) <- groups
rownames(out) <- groups
for (sp1 in 1:n) {
  for (sp2 in 1:n) {
    out[sp1, sp2] <- sum(outer(
      unlist(subset(df, Species == groups[sp1], Sepal.Length)),
      unlist(subset(df, Species == groups[sp2], Sepal.Length)),
      ">"))
  }
}
out

           setosa versicolor virginica
setosa       1128        139        34
versicolor   2302       1169       479
virginica    2457       1927      1165