-1

我是 R 编码的新手，所以我需要帮助或建议。我正在基于坐标构建绘图（最初这是眼动追踪数据）。我只导出没有任何轴或文本的点。稍后我将不得不将这些点与人们正在看的图像进行比较。

所以我的目标是 1）导出的图像具有非常特定的尺寸（与原始图像相同）并且没有任何失真（它似乎在导出对话框窗口中手动输入尺寸后出现）。2）让这个情节在没有额外字段的情况下导出，这显然出现在每一边。

先感谢您

UPD我现在在想是否有任何方法可以将零点移动到图像的左下角？我试图通过削减边距来解决我的问题：par(mar=c(0, 0, 0, 0), xaxs='i', yaxs='i')，但它似乎削减了所有空白部分图片。我想保持潜在的工作部件安全并保持尺寸和比例。

那是我的源代码

    card1 <- "D:/01_experiment/02.04/p02/card1.txt" 
    table01 <- read.table(card1, strip.white = TRUE, sep="\t", header = TRUE)

    jpeg('card81.jpg', 
         width = 842, 
         height = 595)

    par(mar=c(0, 0, 0, 0), xaxs='i', yaxs='i')

    plot(x = table01[,10], 
         y = table01[,11], 

         pch=20,
         type="o",

         #xaxt='n',
         yaxt='n',
         ann=FALSE,

         bty="n",
         xlab = "desity.x",
         ylab = "desity.y"
         )
    dev.off()
4

1 回答 1

0

尝试这个，

library(grid)

pdf("points.pdf", width=5, height=3)
grid.points(x <- runif(10), y <- runif(10), vp=dataViewport(x, y, extension = 0))
dev.off()

在此处输入图像描述

于 2012-04-13T23:31:48.090 回答