Matroids Matheplanet Forum Index
Moderiert von matph
Informatik » Programmieren » R: Funktionen plotten
Druckversion
Druckversion
Autor
Universität/Hochschule J R: Funktionen plotten
julian2000P
Aktiv Letzter Besuch: in der letzten Woche
Dabei seit: 25.10.2020
Mitteilungen: 59
Zum letzten BeitragZum nächsten BeitragZum vorigen BeitragZum erstem Beitrag  Themenstart: 2020-11-14


Hallo zusammen,

beim plotten einer Funktion in R bin ich auf folgendes Problem gestoßen:

f1 <- function(x) {
  return(x)
}

f2 <- function(n) {
  sum = 0
  for (i in 0:n) {
    sum = sum + i^2
  }
  return(sum)
}

f3 <- function(n) {
  k = 0:n
  r <- sum(k^2)
  return(r)
}

x <- seq(0,10,1)
plot(x,f1(x))
plot(x,f2(x))
plot(x,f3(x))

f1 lässt sich ganz normal plotten, bei f2 und f3 erhalte ich aber folgende Fehlermeldung

Error in xy.coords(x, y, xlabel, ylabel, log) :
  'x' and 'y' lengths differ
In addition: Warning message:
In 0:n : numerical expression has 11 elements: only the first used

Leider weiß ich nicht wie ich das Problem beheben kann, wäre toll wenn mir jemand helfen könnte



Wahlurne Für julian2000P bei den Matheplanet-Awards stimmen
Eine Notiz zu diese Forumbeitrag schreiben Notiz   Profil  Quote  Link auf diesen Beitrag Link
AliceC
Aktiv Letzter Besuch: im letzten Quartal
Dabei seit: 03.11.2009
Mitteilungen: 181
Zum letzten BeitragZum nächsten BeitragZum vorigen BeitragZum erstem Beitrag  Beitrag No.1, eingetragen 2020-11-14


Hallo julian2000P,

die Funktionen f2 und f3 erwarten eine Zahl, werden aber mit einem Vektor aufgerufen. Du musst die Funktion einzeln auf jedes Element des Vektors anwenden:
R
plot(x, sapply(x, f2))

Oder du definierst die Funktion gleich so, dass sie einen Vektor akzeptieren.
R
f2 <- function (n) sapply(n, function (k) sum((0:k)^2))
plot(x, f2(x)) 



Wahlurne Für AliceC bei den Matheplanet-Awards stimmen
Eine Notiz zu diese Forumbeitrag schreiben Notiz   Profil  Quote  Link auf diesen Beitrag Link
julian2000P
Aktiv Letzter Besuch: in der letzten Woche
Dabei seit: 25.10.2020
Mitteilungen: 59
Zum letzten BeitragZum nächsten BeitragZum vorigen BeitragZum erstem Beitrag  Beitrag No.2, vom Themenstarter, eingetragen 2020-11-14


Hallo AliceC,

danke für deine Antwort, jetzt funktioniert alles einwandfrei



Wahlurne Für julian2000P bei den Matheplanet-Awards stimmen
Eine Notiz zu diese Forumbeitrag schreiben Notiz   Profil  Quote  Link auf diesen Beitrag Link
julian2000P hat die Antworten auf ihre/seine Frage gesehen.
julian2000P hat selbst das Ok-Häkchen gesetzt.
Neues Thema [Neues Thema]  Druckversion [Druckversion]

 


Wechsel in ein anderes Forum:
 Suchen    
 
All logos and trademarks in this site are property of their respective owner. The comments are property of their posters, all the rest © 2001-2021 by Matroids Matheplanet
This web site was originally made with PHP-Nuke, a former web portal system written in PHP that seems no longer to be maintained nor supported. PHP-Nuke is Free Software released under the GNU/GPL license.
Ich distanziere mich von rechtswidrigen oder anstößigen Inhalten, die sich trotz aufmerksamer Prüfung hinter hier verwendeten Links verbergen mögen.
Lesen Sie die Nutzungsbedingungen, die Distanzierung, die Datenschutzerklärung und das Impressum.
[Seitenanfang]