Diagrammes de dispersion de densité catégorisés en couleurs

Question

Je dois admettre que je suis assez nouveau pour R et la programmation en général.

Je cherche à créer un nuage de densité. J'ai environ 350 points de données et seulement 27 valeurs x, y uniques. Je voudrais qu'il prenne la forme de ce que smoothScatter fait avec la seule différence étant que je voudrais que les points de données prennent la couleur qui refléterait la densité absolue (comme, 1-5 vert; 2-10; bleu; 11-20 , rouge, etc.), pas à quel point la couleur est intense. Essentiellement, les points vives et colorées est ce que je suis après

C'est à quoi il ressemble avant la coloration:

Pouvez-vous s'il vous plaît me aider à comment faire?

Answer 1

Êtes-vous après quelque chose comme ça?

set.seed(357) 
xy <- data.frame(x = runif(37), y = runif(37)) 
xy <- round(xy, 1) 
rp <- sample(1:30, size = nrow(xy), replace = TRUE) 
xy <- xy[rp, ] 
xy$colors <- cut(rp, 3) 

library(ggplot2) 

ggplot(xy, aes(x = x, y = y, color = colors)) + 
    theme_bw() + 
    geom_point() 

ggplot(xy, aes(x = x, y = y, color = colors)) + 
    theme_bw() + 
    geom_point()+ 
    geom_density_2d(h = 0.25) 

Answer 2

Voici une autre façon en utilisant la fonction standard de terrain et mtcars où la couleur reflète le modèle de la voiture.

attach(mtcars) 
cars <- mtcars 
cars$model <- as.factor(rownames(cars)) 
plot(cars$mpg, cars$wt, col = cars$model, pch = 16)