मैं लोगों के बीच समानताएं और असमानताओं की पहचान करने के लिए जैककार्ड गुणांक का उपयोग कर रहा हूं।

हालांकि मैं गुणांक (0 - भिन्न, 1 समान) का प्रतिनिधित्व करने के लिए संघर्ष कर रहा हूं।

साथ ही जब मैं अपनी डेटा संरचना को अतीत में रखना चाहता हूं तो मुझे निम्न त्रुटि प्राप्त होती है:

Dput(head, m) में त्रुटि: 'फ़ाइल' एक वर्ण स्ट्रिंग या कनेक्शन होना चाहिए

हीटमैप बनाने के लिए मैं निम्नलिखित कोड का उपयोग कर रहा हूं:

heatmap(m, Colv = NA, Rowv = NA, 
        scale = "none", 
        xlab = "Identification Numbers",
        ylab = "Identification Numbers")

मेरे डेटा के हिस्से का उपयोग करते समय केवल 12 मामलों में मुझे निम्नलिखित प्लॉट प्राप्त होता है यहां छवि विवरण दर्ज करें

अगर मैं मामलों की संख्या बढ़ाता हूं तो हीटमैप की धुरी पढ़ने के लिए भिन्न होती है।

मैं हर 10वें मामले को दिखाने के लिए अक्ष को कैसे समायोजित कर सकता हूं?

इसके अलावा मैं हीटमैप में एक किंवदंती कैसे जोड़ सकता हूं?

बहुत धन्यवाद

enter image description here

0
user11418708 10 जून 2019, 17:28

1 उत्तर

सबसे बढ़िया उत्तर

दुर्भाग्य से दोनों के लिए कोई अंतर्निहित समर्थन नहीं है। लेकिन यहां अक्ष विराम के लिए एक समाधान है: पंक्ति और स्तंभ नामों के लिए एक वर्ण वेक्टर बनाएं और रिक्त स्थान के साथ १० में से ९ तत्वों को बदलें।

 mat <- matrix(runif(10000, min = 0, max = 10), ncol = 100, byrow = T)

rows <- as.character(1:nrow(mat))
rows[-seq(0, length(rows), 10)] <- ""

cols <- as.character(1:ncol(mat)) 
cols[-seq(0, length(cols), 10)] <- ""

heatmap(mat,
        Colv = NA, Rowv = NA,
        labRow = rows,
        cexRow = 1,
        labCol = cols,
        cexCol = 1)

enter image description here

यदि आप किसी अन्य पैकेज का उपयोग करने के इच्छुक हैं तो मैं lattice-पैकेज से levelplot() की अनुशंसा करता हूं:

(साजिश का कोई मतलब नहीं है, यह दिखाने के लिए सिर्फ एक दृश्य है कि यह क्या कर सकता है)

library(lattice)
library(RColorBrewer)

rows <- seq(11010903, 11011203, length.out = nrow(mat))
cols <- seq(11010903, 11011203, length.out = ncol(mat))

pal <- colorRampPalette(c("red", "yellow"), space = "rgb")
levelplot(mat, xlab="", ylab="", 
          row.values = rows, column.values = cols,
          col.regions = pal(5), at = seq(1,10, by = 2), scales = list(tck = c(1,0))) 

enter image description here

1
Humpelstielzchen 11 जून 2019, 10:34