RjpWiki はオープンソースの統計解析システム R に関する情報交換を目的とした Wiki ですソース polygon.plot <- function(row, col, name, name.of.color, height, cell.width, cell.height) { row <- row*cell.width col <- col*cell.height ordinate.x <- c(row, row, row+cell.width, row+cell.width, row) ordinate.y <- height-c(col, col+cell.height, col+cell.height, col, col) polygon(ordinate.x, ordinate.y, col=name.of.color) text(row+cell.width*0.1,