Manipulieren von Textkantenbeschriftungen ctree

Question

Bekam ein ctree mit vier Etiketten, aber die Kategorien sind langer Text, daher wird nur das erste angezeigt.

category;presence;ratio;tested;located 
palindromic_recursion;1;0;0;0 
conceptual_comprehension;0;1;0;0 
infoxication_syndrome;0;0;1;0 
foreign_words_abuse;0;0;0;1 
palindromic_recursion;1;0;0;0 
conceptual_comprehension;0;1;0;0 
infoxication_syndrome;0;0;1;0 
foreign_words_abuse;0;0;0;1 

concepts.ctree <- ctree(category ~., data) 
plot(concepts.ctree) 

ist es eine Möglichkeit oder Parameter für manipultating (Drehen) Text, Randmarkennamen und auf diese Weise sie zwingen, alle in Plot dargestellt werden?

Meine realen Daten sind viel größer, aber dieses Beispiel ist in Ordnung, um es zu testen, wenn Sie nicht Zoom-Tool verwenden.

Grüße

Answer 1

war es keine Option für diese bis jetzt. Aber ich habe gerade die Entwicklungsversion von partykit auf R-Forge optimiert, um diese Funktion zu unterstützen. Derzeit wird das Paket neu aufgebaut, aber hoffentlich können Sie bald install.packages("partykit", repos = "http://R-Forge.R-project.org") sagen - oder wenn Sie nicht so lange warten wollen, schauen Sie sich einfach das SVN an und bauen Sie sich neu.

In der neuen Version können Sie die Argumente rot und just an grid.text() übergeben, um die Drehung und Ausrichtung der X-Achsenbeschriftungen zu steuern.

die Daten lesen:

data <- read.csv2(textConnection(
"category;presence;ratio;tested;located 
palindromic_recursion;1;0;0;0 
conceptual_comprehension;0;1;0;0 
infoxication_syndrome;0;0;1;0 
foreign_words_abuse;0;0;0;1 
palindromic_recursion;1;0;0;0 
conceptual_comprehension;0;1;0;0 
infoxication_syndrome;0;0;1;0 
foreign_words_abuse;0;0;0;1" 
)) 

den Baum Passform (unter Verwendung der partykit Umsetzung ctree()):

library("partykit") 
concepts.ctree <- ctree(category ~ ., data = data) 

Zur Visualisierung zunächst ein Ansichtsfenster mit ausreichend großen Ränder auf der x-Achse erzeugen. Fügen Sie dann die Struktur zur vorhandenen Ansichtsfenster-Seite hinzu und legen Sie die Rotations/Justierungs-Argumente für das Barplot fest.

pushViewport(plotViewport(margins = c(6, 0, 0, 0))) 
plot(concepts.ctree, tp_args = list(rot = 45, just = c("right", "top")), 
    newpage = FALSE)