Eine lange Funktion zusammenfassen

[askill]

Moin:)

hätte da mal folgende Frage. Wie könnte ich eine längere Funktion unter einem kürzeren Code speichern?
Bsp.: Ich möchte ein Balkendiagram erstellen mit ggplot, aber dafür zum Beispiel nur "Balken" eingeben und dann soll die Funktion mit veränderbaren Stellen erscheinen.

view "Balken"
ggplot(data = bier, aes(x = Alter, y = Bier)) +
geom_col() +
scale_y_continuous(breaks = seq(0, 50, 5), minor_breaks = seq(0, 50, 5)) +
labs(title = "Alter und Bier trinken",
subtitle = "Trinkverhalten von Studenten",
x = "Alter (Jahre)", y = "Trinken (pro Monat)")

Dann hätte ich mir die meiste Schreiberei gespart und hätte direkt das, was ich nur noch einsetzen muss.

Danke im Voraus

[bigben]

Hi!

Wenn ich Dich richtig verstehe, dann willst Du so eine Art Textbaustein erstellen. Das wäre dann keine Frage an R sondern an den von Dir genutzten Editor. Oder geht es Dir darum, dafür eine Funktion zu schreiben?

LG,
Bernhard

[askill]

Hi!

Wenn ich Dich richtig verstehe, dann willst Du so eine Art Textbaustein erstellen. Das wäre dann keine Frage an R sondern an den von Dir genutzten Editor. Oder geht es Dir darum, dafür eine Funktion zu schreiben?

LG,
Bernhard

Also es geht mir drum, dass ich die Funktion einem neu erstellten Befehl zuweise. Der ganze Code für die Funktion erscheint dann, wenn ich den Befehl dazu gebe. Dann würde der library(ggplot2), einen neuen Befehl hinzufügen.

LG

[bigben]

Der erste Teil dieser Antwort klingt nach Funktionsdefinition, der zweite ("Code erscheint") nach Textbaustein/Autotext. Ich bin drum nicht schlauer.

[askill]

Der erste Teil dieser Antwort klingt nach Funktionsdefinition, der zweite ("Code erscheint") nach Textbaustein/Autotext. Ich bin drum nicht schlauer.

Ja würde ich auch so bezeichnen! Irgendwelche Ideen, wie ich das umsetzen kann?
LG

[jogo]

Hallo askill,

ich bin auch verwirrt ob der Formulierung, aber ich frage jetzt einfach mal:
meinst Du so:

Code: Alles auswählen

fBalken <- function() {
  ggplot(data = bier, aes(x = Alter, y = Bier)) +
    geom_col() +
    scale_y_continuous(breaks = seq(0, 50, 5), minor_breaks = seq(0, 50, 5)) +
    labs(title = "Alter und Bier trinken",
         subtitle = "Trinkverhalten von Studenten",
         x = "Alter (Jahre)", y = "Trinken (pro Monat)")
}
fBalken()

Gruß, Jörg