Deutsches R-Forum

Vielen Dank,

jetzt komme ich erstmal selber weiter.

Gruss

Bernhard

> str(Daten)
'data.frame': 158 obs. of 12 variables:
$ X.A..Reg..Nr. : num 1 11 13 21 24 30 32 34 35 41 ...
$ X.B..Reg..Jahr : int 2017 2017 2017 2017 2017 2017 2017 2017 2017 2017 ...
$ X.C..Kaufpreis..gem..Vertrag...... : num 148000 115000 230000 255000 165000 170000 180000 124000 190000 ...

Hallo Jörg,

danke für den Tip, genau das hat mir gefehlt.

Die Kurve ist endlich da.

Daten <- read.table("R_SWFpunkt.csv", sep = ";", dec = ".", header = TRUE, stringsAsFactors = FALSE)

SW <- Daten[,5] # Sachwert aus Spalte 5 in Vektor SW

SWF <- Daten[,7] # Sachwert aus Spalte 7 in Vektor SWF ...

SoSollEsSein.JPG Rplot.png Hallo,

so das ist mein code:

Daten <- read.table("R_SWFpunkt.csv", sep = ";", dec = ".", header = TRUE, stringsAsFactors = FALSE)

SW <- Daten[,5] # Sachwert aus Spalte 5 in Vektor SW
SWF <- Daten[,7] # Sachwert aus Spalte 7 in Vektor SWF
BRW <- Daten[,6 ...

Sorry, leider bin ich ein blutiger R Anfänger

> str(DIA)
num [1:28, 1:3] 123823 461577 138929 192906 130580 ...
- attr(*, "dimnames")=List of 2
..$ : NULL
..$ : chr [1:3] "SW" "SWF" "BRW"
>

mit dem Code von Jörg kommt das gleiche heraus wie mit EXCEL

lm(SWF ~ log(SW), data=as.data.frame ...

Danke

Ich habe den Startwert jetzt weggelassen

<-nls(y~a*ln(x)+b,data=str(DIA))

zumindest die Fehlermeldung ist jetzt anders

num [1:252, 1:2] 160684 120282 302954 331684 181508 ...
- attr(*, "dimnames")=List of 2
..$ : NULL
..$ : chr [1:2] "SW" "SWF"
Error in nls(y ~ a * ln(x) + b, data = str ...

Ich möchte mit R eine Logarithmische Regression berechnen und darstellen.

Habe schon herausgefunden das es mit dem Befehl nls() möglich ist.

Hier mein verzweifelter Versuch, der nur eine Fehlermeldung produziert.

w<-nls(y~a*lnx+b,data=DIA,start=DIA)

Error in nls(y ~ a * lnx + b, data = DIA ...