Verfügbare Informationen zu "36b"
Qualität des Beitrags: Beteiligte Poster: Lucie - Nils - Shorty Forum: das Problem R aus dem Unterforum: Vergleichen Antworten: 6 Forum gestartet am: Freitag 18.05.2007 Sprache: deutsch Link zum Originaltopic: 36b Letzte Antwort: vor 16 Jahren, 10 Monaten, 13 Tagen, 2 Stunden, 22 Minuten
Alle Beiträge und Antworten zu "36b"
Re: 36b
Lucie - 13.06.2007, 18:0236b
Hallo
also hier mal meine Ansätze zu 36b
#(b)
#10x10 Matrix A mit aii=i,aij=0 für i!=j
A <- diag(c(1:10),10,10)
#abrufen der Matrix A
A
#10x10 Matrix B mit bij=min{i,j}
B1 <- matrix(for(i in 1:10) print(1:i),10,10)
B1
m <- c(0,0,0,0,0,0,0,0,0,0, -1,0,0,0,0,0,0,0,0,0, -2,-1,0,0,0,0,0,0,0,0, -3,-2,-1,0,0,0,0,0,0,0,
+ -4,-3,-2,-1,0,0,0,0,0,0, -5,-4,-3,-2,-1,0,0,0,0,0, -6,-5,-4,-3,-2,-1,0,0,0,0, -7,-6,-5,-4,-3,-2,-1,0,0,0,
+ -8,-7,-6,-5,-4,-3,-2,-1,0,0, -9,-8,-7,-6,-5,-4,-3,-2,-1,0,)
B2 <- matrix(m,10,10)
B2
t(B2)
B <- B1+t(B2)
#abrufen der fertigen Matrix B
B
Matrix A finde ich echt gut, aber bei Matrix B ist das halt nicht so wirklich richtig, weil ich einfach 100 Werte eingegeben hab. In der Hilfe steht etwas von "zwei for-Schleifen verbinden" und irgendwas von "if..." Da ich mich aber mit dem ganzen Schleifenzeug nicht auskenne, hab ich nur eine forschleife geschafft und den rest dann per Hand gemacht.
Im Prinzip kann man das für Matrix C auch machen, aber ob das von den Tutoren akzeptiert wird? Wohl eher nicht...
Naja, also falls einer ne bessere Lösung für Matrix B und C hat, kann er sie ja posten...
Re: 36b
Nils - 15.06.2007, 00:14
mit diesen schleifen kann ich das auch nicht, ich hab das für die zweite bei b so gamacht:
B=matrix(c(rep(1,11),rep(2,9),1:2,rep(3,8),1:3,rep(4,7),1:4,rep(5,6),
1:5,rep(6,5),1:6,rep(7,4),1:7,rep(8,3),1:8,rep(9,2),1:9,10),10,10)
und so C
c=c(1,2,1);d=rep(0,8)
C=matrix(c(1,2,rep(c(d,c),8),d,2,1),10,10)
:lol:
Re: 36b
Lucie - 15.06.2007, 01:07
also ich hab auch noch ne neue Möglichkeit gefunden Matrix B zu erstellen:
##10x10 Matrix B mit bij=min{i,j}
#mit Hilfe einer for-Schleife erstellen einer forläufigen Matrix
Bvl <- matrix(for(i in 1:10)print(1:i),10,10)
#vertauschen von Zeilen und Spalten von Matrix B1
t(Bvl)
#mit pmin bekommt man die Minima für die gilt bij=min{i,j}
B <- pmin(a,t(a))
#abrufen der Matrix B
B
find das eigentlich gar nicht so übel :D
Re: 36b
Lucie - 15.06.2007, 01:09
upps, da is mir nen Fehler reingerutscht
muss heißen
B <- pmin(a,t(Bvl))
:P
Re: 36b
Shorty - 15.06.2007, 09:03
Bei dem Befehl : B <- pmin(a,t(Bvl)) Sacht er mir: "Fehler in pmin(a, t(Bvl)) : objekt "a" nicht gefunden"
... :(
Re: 36b
Lucie - 15.06.2007, 18:38
Ja sorry,
hatte meine Sachen nochmal umbenannt und dann ist mir da noch ein kleiner Fehler unterlaufen... war schon nen bissl später gestern :)
Also falls noch irgendwen interessiert, der Befehl lautet richtig so:
B <- pmin(Bvl,t(Bvl))
Lg
Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken
Weitere Beiträge aus dem Forum das Problem R
36b - gepostet von ClaudiaB am Donnerstag 14.06.2007
Zettel 7 Aufgabe 29b guter link - gepostet von Levin am Mittwoch 06.06.2007
Ähnliche Beiträge wie "36b"
Unterschied df 36a, 36b und 36d ??? - Linso (Dienstag 20.09.2005)
36b - ClaudiaB (Donnerstag 14.06.2007)