Seite 1 von 1
Print oder Cat - Zahl vor der Reihe soll verschwinden
Verfasst: Fr Dez 22, 2017 6:01 pm
von Mr.KSS
In meiner Console erscheint Folgendes (siehe auch "Aktueller Stand")
Code: Alles auswählen
> print(cbind(mean,sd))
mean sd
[1,] -0.001635293 1.007086
Es soll aber so aussehen:
Also die Zahl [1] soll verschwinden. Wie muss ich vorgehen?
Vielen Dank für Eure Hilfen.
![Bild]()
Re: Print oder Cat - Zahl vor der Reihe soll verschwinden
Verfasst: Fr Dez 22, 2017 7:09 pm
von bigben
Hi,
herzlich willkommen im Forum.
Das Bild ist nicht nötig - R schreibt ja reinen Text - den kann man gut ins Forum kopieren und mit code-Tags als Code kennzeichnen. Deine Überschrift zeigt ja schon einen möglichen Lösungsansatz:
LG,
Bernhard
Re: Print oder Cat - Zahl vor der Reihe soll verschwinden
Verfasst: Fr Dez 22, 2017 8:01 pm
von Mr.KSS
Vielen Dank für Deine Antwort. Jedoch komm ich damit nicht so richtig klar. Ich habe folgenden Code geschrieben:
Code: Alles auswählen
EWFA_Summary <- function(x) {
mean <-mean(x)
sd <- sd(x)
Quantil <- (c(quantile(x, 0.00),
quantile(x, 0.01),
quantile(x, 0.25),
quantile(x, 0.50),
quantile(x, 0.75),
quantile(x, 0.99),
quantile(x, 1.00)))
Main1="[[1]]\n"
cat(Main1)
print(cbind(mean,sd))
Main2="[[2]]\n"
cat(Main2)
print(cbind(Quantil))
}
x=rnorm(1000)
EWFA_Summary(x)
Und in der Console soll im Endergebnis von der Aufteilung genau so aussehen (Zahlen spielen keine Rolle). Wie unschwer zu erkennen ist, kommt in dem oben genannten Code in der ersten Zeile immer ein [1] und dieses soll verschwinden.
Re: Print oder Cat - Zahl vor der Reihe soll verschwinden
Verfasst: Fr Dez 22, 2017 10:35 pm
von EDi
Code: Alles auswählen
EWFA_Summary <- function(x) {
mean <-mean(x)
sd <- sd(x)
Quantil <- (c(quantile(x, 0.00),
quantile(x, 0.01),
quantile(x, 0.25),
quantile(x, 0.50),
quantile(x, 0.75),
quantile(x, 0.99),
quantile(x, 1.00)))
cat("[[1]]\n")
print(c(mean = mean, sd = sd))
cat("\n")
cat("[[2]]\n")
print(cbind(Quantil))
}
x=rnorm(1000)
EWFA_Summary(x)
Kleine Abwandlung zu einem named vector...