R ggplot Streudiagramm Farbe mehrere Spalten
dnsko
Ich versuche, ein Streudiagramm mit ggplotmehreren Feldern zu erstellen . Ich habe über diese Streudiagramme und die Farbgebung für ein Feld gelesen, mich aber gefragt, wie ich dies für den ggplot2moviesDatensatz tun würde . Ich wollte basierend auf dem Genre färben, aber diese Genres sind alle aufgeteilt:
> movies <- ggplot2movies::movies
> head(movies)
title year length budget rating votes r1 r2 r3 r4 r5 r6 r7 r8 r9 r10 mpaa Action Animation Comedy Drama Documentary Romance Short
<chr> <int> <dbl> <int> <dbl> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <chr> <int> <int> <int> <int> <int> <int> <int>
1 $ 1971 121 NA 6.4 348 4.5 4.5 4.5 4.5 14.5 24.5 24.5 14.5 4.5 4.5 0 0 1 1 0 0 0
2 $1000 a Touchdown 1939 71 NA 6.0 20 0.0 14.5 4.5 24.5 14.5 14.5 14.5 4.5 4.5 14.5 0 0 1 0 0 0 0
3 $21 a Day Once a Month 1941 7 NA 8.2 5 0.0 0.0 0.0 0.0 0.0 24.5 0.0 44.5 24.5 24.5 0 1 0 0 0 0 1
4 $40,000 1996 70 NA 8.2 6 14.5 0.0 0.0 0.0 0.0 0.0 0.0 0.0 34.5 45.5 0 0 1 0 0 0 0
5 $50,000 Climax Show, The 1975 71 NA 3.4 17 24.5 4.5 0.0 14.5 14.5 4.5 0.0 0.0 0.0 24.5 0 0 0 0 0 0 0
6 $pent 2000 91 NA 4.3 45 4.5 4.5 4.5 14.5 14.5 14.5 4.5 4.5 14.5 14.5 0 0 0 1 0 0 0
Was ist der beste Weg, um dies zu erreichen (Farbe basierend auf dem Genre)? Jede Hilfe wird sehr geschätzt!
Jake Kaupp
Wie @hrbrmstr angibt, müssen Sie die Daten von breit nach lang transformieren. Sie können tidyr::gather()in Verbindung mit verwenden dplyr::filter(), um dies zu erreichen. Diese Kette:
- sammelt die Namen und Werte von Aktion bis Kurz in den Spalten
genreundflag. Dadurch werden die vielen Spalten (breit) in ein Schlüssel-Wert-Paar (lang) verschoben. - Verwendet Filter, um die überflüssigen Werte für
genre(diejenigen, bei denen das Flag == 0 ist) zu entfernen . - Speichert den resultierenden Datenrahmen in
plot_data
Der verbleibende Code ist ein einfaches ggplot2Scatterplot von lengthvs rating.
library(dplyr)
library(tidyr)
library(ggplot2)
library(ggplot2movies)
plot_data <- movies %>%
gather(genre, flag, Action:Short) %>%
filter(flag != 0)
ggplot(plot_data, aes(x = rating, y = length)) +
geom_point(aes(color = genre), alpha = 0.4)
Dieser Artikel stammt aus dem Internet. Bitte geben Sie beim Nachdruck die Quelle an.
Bei Verstößen wenden Sie sich bitte [email protected] Löschen.
bearbeiten am
Verwandte Artikel
TOP Liste
- 1
TypeAhead.js zeigt keine Ausgangsschienen an?
- 2
Wie lade ich eine Datei herunter, ohne den Typ oder Dateinamen zu kennen?
- 3
So verschieben Sie ein Bild in Flutter/Dart mit einem Draggable
- 4
Pandas rufen einen Wert basierend auf dem Index ab
- 5
Unity Build-Fehler: Der Name 'EditorUtility' ist im aktuellen Kontext nicht vorhanden
- 6
Wie kann ich eine verschachtelte Schleife mit lapply in R ersetzen?
- 7
Interpolieren Sie mit Python die 2D-Matrix entlang der Spalten
- 8
numpy: Berechnen Sie die Ableitung der Softmax-Funktion
- 9
Warum funktioniert das Umgebungslicht in diesem Beispiel nicht?
- 10
spring-data-jpa: ORA-01795: Die maximale Anzahl von Ausdrücken in einer Liste beträgt 1000
- 11
Wie verwende ich Format-Table ohne Abschneiden von Werten?
- 12
MongoDB eingebettetes Dokument unterscheiden und filtern
- 13
So berechnen Sie die Verfügbarkeit von Anwendungen (SLA)
- 14
Wie vermeide ich, dass die gesamte App neu geladen wird, wenn Nav.Link von React-Bootstrap verwendet wird?
- 15
Aktualisieren des Werts im Json-Objekt in Python
- 16
Wie aktualisiere ich ein Feld in einer Raumdatenbank mit einem Repository und einem Ansichtsmodell?
- 17
Python gibt einen Fehler aus, dass eine Datei nicht vorhanden ist, wenn dies eindeutig der Fall ist
- 18
Warum funktioniert Phantomjs nicht mit dieser Site?
- 19
Docker bleibt beim Ausführen von time.sleep (1) in einer Python-Schleife hängen
- 20
Überprüfen Sie, ob der ausgewählte Wert 'YES' ist, wenn ja, aktivieren Sie ein Steuerelement mit Javascript
- 21
Deklarieren einer nicht initialisierten Variablen in der Klassendefinition in Python
Lass mich ein paar Worte sagen