기울임 꼴로 멍크 트로 그램을 만드는 법

Question

그래서 거리 매트릭스를 기반으로 42 개의 다른 유전자의 덩어리를 만들려고합니다. 도면을 사용하여 만든 :

D6 = DIST (t (cildata))

hc6 = hclust 그때 단지 저장된

(D6)

플롯 (hc6) jpeg로 음모를 꾸미십시오.

나는 이탤릭체로 된 유전자 이름을 가진 플롯의 버전을 저장해야하는데, 그렇게하는 법을 알지 못한다. 주 플롯 제목을 기울임 꼴로 변경하는 방법에 관한 비슷한 질문을 보았지만 플롯 안의 레이블은 변경하지 않았습니다.

모든 도움을 주시면 대단히 감사하겠습니다.

감사합니다, 마커스 G.

Answer 1

hc <- hclust(dist(USArrests), "ave") 
italicLeafs <- c("Iowa", "New Hampshire") # select: italic leafs 

den <- dendrapply(as.dendrogram(hc), FUN=function(n) { 
    if(is.leaf(n)) 
    if (attr(n, "label") %in% italicLeafs) 
     attr(n, "label") <- as.expression(substitute(italic(leaf), list(leaf=attr(n, "label")))) 
    n 
}) 

plot(den)