Coffee break. Trees, some reading and stupidly playing with tree clusters...

http://www.exegetic.biz/blog/2013/05/package-party-conditional-inference-trees/ very good read.
http://www.r-bloggers.com/package-party-conditional-inference-trees/
http://www.statmethods.net/advstats/cart.html
https://stat.ethz.ch/R-manual/R-devel/library/stats/html/hclust.html

Played like that:

> drzewko<-ctree(mojedane$y~.,data = mojedane[,c(1:3)])

> predict(drzewko, type = "response")