heute ist der Geburtstag von
Pierre-Simon Laplace (28.03.1749 - 05.03.1827)



Antwort erstellen 
Benutzername:
Betreff:
Nachrichtentext:
Gib deine Nachricht hier ein. Sie darf nicht mehr als 60000 Zeichen enthalten. 

Smilies
:D :) :( :o :shock: :? 8) :lol: :x :P :oops: :cry: :evil: :twisted: :roll: :wink: :!: :?: :idea: :arrow: :| :mrgreen:
Schriftgröße:
Tipp: Formatierungen können schnell auf den markierten Text angewandt werden.  Schriftfarbe
Optionen:
BBCode ist eingeschaltet
[img] ist eingeschaltet
[flash] ist ausgeschaltet
[url] ist eingeschaltet
Smilies sind eingeschaltet
BBCode ausschalten
Smilies ausschalten
URLs nicht automatisch verlinken
Bestätigungscode
Bestätigungscode
Bestätigungscode:
Gib den Code genau so ein, wie du ihn siehst; Groß- und Kleinschreibung wird nicht unterschieden.
   

Die letzten Beiträge des Themas - SS10: UE4 
Autor Nachricht

Mit Zitat antworten Beitrag Verfasst: Mi 28-04-2010 00:00:19
Re: SS10: UE4
und noch der Code für C2:
Code:
library(MASS) ## loading package MASS

x <- scan("golf.txt")

hist(x,probability=TRUE); lines(density(x),col="red")
val <- seq(min(x),max(x),by=0.1)
lines(val,dnorm(val,mean(x),sd(x)),col="blue")
y <- fitdistr(x,"logistic")
lines(val,dlogis(val,location=y$estimate[1],scale=y$estimate[2]),col="green")

Mit Zitat antworten Beitrag Verfasst: Di 27-04-2010 23:57:19
Re: SS10: UE4
der_emu hat geschrieben:
c1:
Code:
> y1<-dgamma(g,10.4492374,1.129647)
> y2<-dgamma(g,10.45038,0.8851351)

wichtig ist eben wie man auf die schätzwerte kommt!

also mein C1 sieht dann etwa so aus:
Code:
library(MASS) ## loading package MASS

x <- c(10,10,6,11,8,7,11,12,12,6,10,6,13,8,12,7,6,16,9,5)
y <- fitdistr(x,"gamma")
val <- seq(min(x),max(x),by=0.1)

hist(x,probability=TRUE);lines(density(x),col="red")
lines(val, dgamma(val,shape=y$estimate[1], rate=y$estimate[2]),col="blue")
bet <- (n-1)/n*var(x)/mean(x)
alph <- mean(x)/bet

lines(val,dgamma(val,shape=alph, rate=bet),col="green")

Mit Zitat antworten Beitrag Verfasst: Di 27-04-2010 17:03:55
Re: SS10: UE4
Danke, jetzt hab' ich's hingebogen! Man muss allerdings noch etwas wie

x<-seq(0,20,by=0.1)

vorher schreiben, damit es geht, ich denke, dass war mein Problem.

Mit Zitat antworten Beitrag Verfasst: Di 27-04-2010 16:27:17
Re: SS10: UE4
c1:
Code:
> g<-seq(0,20,by=0.1)
> y1<-dgamma(g,10.4492374,1.129647)
> y2<-dgamma(g,10.45038,0.8851351)
> hist(x,prob=TRUE,xlim=c(0,20),ylim=c(0,0.2))
> lines(g,y1,col="grey",lwd=2)
> lines(g,y2,col="black",lwd=2)

Mit Zitat antworten Beitrag Verfasst: Di 27-04-2010 15:46:06
Re: SS10: UE4
Hat irgendwer was zu den R-Beispielen? Komm' mit der Graphik nicht ganz klar.

mfg Peda

Mit Zitat antworten Beitrag Verfasst: Mo 26-04-2010 19:48:54
Re: SS10: UE4
Anmerkung zu Bsp 3 (ist vielleicht etwas verwirrend aufgeschrieben): nur Schätzer für alpha unverzerrt. Vgl Bsp 2: Gibt es einen unverzerrten Schätzer für theta?

Mit Zitat antworten Beitrag Verfasst: Sa 24-04-2010 19:52:59
Re: SS10: UE4
@heijo: Danke für die Lösungen. :D

Mit Zitat antworten Beitrag Verfasst: Sa 24-04-2010 16:40:26
Re: SS10: UE4
2. Mit dem Satz vom unbewussten Statistiker konkret den Erwartungswert des Schätzers bestimmen - wäre er unverzerrt, hätte ich ein Polynom vom Grad größer 0, dass für alle x in (0,1) konstant ist - unmöglich.

Mit Zitat antworten Beitrag Verfasst: Sa 24-04-2010 12:24:43
Re: SS10: UE4
Meine Vorschläge.

Mit Zitat antworten Beitrag Verfasst: Fr 23-04-2010 15:30:19
SS10: UE4
Zu 2: Kann es sein, dass es ausreicht zu sagen: tau(0)=inf?


Gehe zu:  
cron
Powered by phpBB © phpBB Group.  |  Designed by STSoftware for PTF  |  © Czechnology 2007 - 2024  |  Deutsche Übersetzung durch phpBB.de