R में पिक्सेल मैट्रिक्स की छवि कैसे बनाएं?

R भाषा में image() फंक्शन का उपयोग करके मैट्रिक्स डेटा को पिक्सेल इमेज (हीटमैप/रैस्टर प्लॉट) के रूप में विज़ुअलाइज़ कर सकते हैं।

बुनियादी सिंटैक्स

image(x, y, z, col = heat.colors(12), ...)

• z - संख्यात्मक मैट्रिक्स (मान रंग मैप होंगे)
• col - रंग पैलेट
• useRaster - रैस्टर इमेज के रूप में रेंडर करने के लिए (तेज़)

उदाहरण 1: बुनियादी मैट्रिक्स इमेज

# 10x10 रैंडम मैट्रिक्स बनाएं (माध्य 1.5)
M <- matrix(rnorm(100, 1.5), nrow = 10)

# डिफ़ॉल्ट रंगों के साथ प्लॉट
par(mar = c(5, 5, 5, 5))  # मार्जिन सेट करें
image(M, useRaster = TRUE, axes = FALSE)

उदाहरण 2: कस्टम मार्जिन और रंग

# अलग मार्जिन
par(mar = c(10, 10, 10, 10))
image(M, useRaster = TRUE, axes = FALSE)

# छोटे मार्जिन
par(mar = c(2, 2, 2, 2))
image(M, useRaster = TRUE, axes = FALSE)

उदाहरण 3: ग्रेस्केल कलर पैलेट

# 180 शेड्स के साथ ग्रेस्केल
image(M, axes = FALSE, col = grey(seq(0, 1, length = 180)))

उदाहरण 4: कस्टम कलर पैलेट (हीटमैप स्टाइल)

# RColorBrewer पैकेज से (यदि इंस्टॉल है)
# library(RColorBrewer)
# colors <- colorRampPalette(brewer.pal(9, "YlOrRd"))(100)
# image(M, col = colors)

# बेस R में कस्टम ग्रेडिएंट
colors <- colorRampPalette(c("blue", "white", "red"))(100)
image(M, col = colors, axes = FALSE)

उदाहरण 5: एक्सिस लेबल्स और टाइटल के साथ

# पंक्ति और स्तंभ नामों के साथ मैट्रिक्स
rownames(M) <- paste0("Row", 1:10)
colnames(M) <- paste0("Col", 1:10)

image(
    1:ncol(M), 1:nrow(M), t(M)[nrow(M):1, ],  # ट्रांसपोज और फ्लिप
    col = heat.colors(12),
    xlab = "स्तंभ", ylab = "पंक्ति",
    main = "मैट्रिक्स विज़ुअलाइज़ेशन",
    axes = TRUE
)

चलाने का तरीका

1. R या RStudio खोलें
2. कोड कॉपी करके कंसोल में पेस्ट करें
3. या .R फ़ाइल सेव करके source("filename.R") चलाएं

महत्वपूर्ण पैरामीटर्स

नोट

यह आर्टिकल R भाषा के बारे में है, JavaScript का नहीं। R सांख्यिकीय कंप्यूटिंग और ग्राफिक्स के लिए एक भाषा है।