[R] Tree plot with percentages and hierarchies

[Joonas Isoketo]

Hi,

super, that was exactly what I needed! Thanks!

Best regards,

Joonas Isoketo 



-----Alkuperäinen viesti-----
Lähettäjä: Jim Lemon [mailto:drjimlemon at gmail.com] 
Lähetetty: 9. kesäkuutata 2016 1:40
Kopio: Joonas Isoketo <joonas.isoketo at houston-analytics.com>; r-help at r-project.org
Aihe: Re: [R] Tree plot with percentages and hierarchies

Hi Joonas,
It is easy to display hierarchic classification using either the plot.dendrite or sizetree functions (plotrix). At the moment, they will only display counts, not percentages. It would not be too difficult to reprogram either one to display percentages. Here are examples with shortened category names (you'll see why):

Level_0 = c("Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X", "Action X")
Level_1 = c("R1", "R1", "R1", "R1", "R1", "R1", "R1", "R1", "R1", "R1", "R2", "R2", "R2", "R2", "R2", "R2", "R2", "R2", "R2", "R2")
Level_2 = c("Subr11", "Subr11", "Subr11", "Subr11", "Subr12", "Subr12", "Subr12", "Subr12", "Subr12", "Subr12", "Subr21", "Subr21", "Subr21", "Subr21", "Subr21", "Subr21", "Subr21", "Subr21", "Subr22",
"Subr22")
Level_3 = c("Subsubr111", "Subsubr111", "Subsubr111", "Subsubr112", "Subsubr121", "Subsubr121", "Subsubr121", "Subsubr121", "Subsubr121", "Subsubr121", "Subsubr221", "Subsubr221", "Subsubr221", "Subsubr221", "Subsubr221", "Subsubr221", "Subsubr221", "Subsubr221", "Subsubr222",
"Subsubr222")

Levels = data.frame(Level_0 = Level_0, Level_1 = Level_1, Level_2 = Level_2, Level_3 = Level_3)

library(plotrix)
plot.dendrite(Levels)
sizetree(Levels)

Jim


On Thu, Jun 9, 2016 at 6:03 AM, Bert Gunter <bgunter.4567 at gmail.com> wrote:
> I am not really sure what you want, but it sounds like you want the 
> "rpart" package (which is part of the standard R distribution).
>
> If that won't do, check the machine learning task view here:
> https://cran.r-project.org/web/views/MachineLearning.html
>
> Cheers,
> Bert
>
>
> Bert Gunter
>
> "The trouble with having an open mind is that people keep coming along 
> and sticking things into it."
> -- Opus (aka Berkeley Breathed in his "Bloom County" comic strip )
>
>
> On Wed, Jun 8, 2016 at 11:31 AM, Joonas Isoketo 
> <joonas.isoketo at houston-analytics.com> wrote:
>> Hi,
>>
>> I have the following problem:
>>
>> I want to visualize distributions of a few varibles in a specific order with a help of tree figure. Above of all is "Action x" and that happens for two (or n) reasons: "Reason 1" 50 % and "Reason 2" 50 %.
>> Further, "Reason 1" happens for two (or n) subreasons: "Subreason 11" (75 %) and "Subreason 12" (25 %). And further, "Subreason 11" happens for two (or n) subsubreason "SubSubreason 111" etc.
>>
>> Every time when parent node splits to its childs, the sum of child node's percentages should be 100 %.
>>
>> I am very pleaseful if someone could help me with this! If the plot cannot be made "on the fly", also instructions of custom tree helps (hard coded values).
>>
>> Here is the test data:
>>
>> Level_0 = c("Action X", "Action X", "Action X", "Action X", "Action 
>> X", "Action X", "Action X", "Action X", "Action X", "Action X", 
>> "Action X", "Action X", "Action X", "Action X", "Action X", "Action 
>> X", "Action X", "Action X", "Action X", "Action X")
>> Level_1 = c("Reason 1", "Reason 1", "Reason 1", "Reason 1", "Reason 
>> 1", "Reason 1", "Reason 1", "Reason 1", "Reason 1", "Reason 1", 
>> "Reason 2", "Reason 2", "Reason 2", "Reason 2", "Reason 2", "Reason 
>> 2", "Reason 2", "Reason 2", "Reason 2", "Reason 2")
>> Level_2 = c("Subreason 11", "Subreason 11", "Subreason 11", 
>> "Subreason 11", "Subreason 12", "Subreason 12", "Subreason 12", 
>> "Subreason 12", "Subreason 12", "Subreason 12", "Subreason 21", 
>> "Subreason 21", "Subreason 21", "Subreason 21", "Subreason 21", 
>> "Subreason 21", "Subreason 21", "Subreason 21", "Subreason 22", 
>> "Subreason 22")
>> Level_3 = c("Subsubreason 111", "Subsubreason 111", "Subsubreason 
>> 111", "Subsubreason 112", "Subsubreason 121", "Subsubreason 121", 
>> "Subsubreason 121", "Subsubreason 121", "Subsubreason 121", 
>> "Subsubreason 121", "Subsubreason 221", "Subsubreason 221", 
>> "Subsubreason 221", "Subsubreason 221", "Subsubreason 221", 
>> "Subsubreason 221", "Subsubreason 221", "Subsubreason 221", 
>> "Subsubreason 222", "Subsubreason 222")
>>
>> Levels = data.frame(Level_0 = Level_0, Level_1 = Level_1, Level_2 = 
>> Level_2, Level_3 = Level_3)
>>
>>
>>
>> Best regards,
>>
>> Joonas Isoketo
>>
>>
>>
>>
>>         [[alternative HTML version deleted]]
>>
>> ______________________________________________
>> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see 
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> PLEASE do read the posting guide 
>> http://www.R-project.org/posting-guide.html
>> and provide commented, minimal, self-contained, reproducible code.
>
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see 
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide 
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.