提高校准曲线的质量

时间:2016-02-18 20:48:29

标签: r math plot statistics

我已经实施了几种校准技术。我生成校准图如下(虚拟代码):

var uploadURL = data;

    var ft = new FileTransfer();
    var options = new FileUploadOptions();
    options.fileKey="file";
    options.fileName=imageURI.substr(imageURI.lastIndexOf('/')+1);
    options.mimeType="image/jpeg";

    var params = {};

    options.headers={"Authorization": AUTH, "Connection": "close" };

    params.functionCall = 'genericImageUpload';
    params.eventId = currentEvent
    params.isVideo = '1';

    options.params = params;
    options.fileName  = 'tmp.jpg';//here
    options.chunkedMode = false;

    console.log( options );

    ft.upload(imageURI,
        uploadURL,
    function(result) {
        hideLoader();
        currentProblemImgUrl = result.response;
        $("#uploadImgReportBtn").html('Screenshot Uploaded!');
    },function(error) { 
        hideLoader();
    }, options);

我的问题是(不要注意图表,这只是一个可重复的例子),jpg的质量真的很差。

要更改它,我尝试按以下方式使用包require("caret") x <- exp(rnorm(1000))/sum(exp(rnorm(1000))) # "calibrated prediction" target <- rep(0:1, 1000) df <- data.frame(target, x) names(df) <- c("target", "prediction") df$target <- as.factor(df$target) cali_plot <- calibration( as.formula(paste("target ~ ", paste(c("x"), sep = ":", collapse =" + "), sep = "")), data = df, cut = 10 ) # in ten bins xyplot(cali_plot, auto.key = list(columns = 2)) jpeg(file = "somewhere/method_1/...", bg = "transparent", width = 400, height = 350) xyplot(cali_plot, auto.key = list(columns = 2)) dev.off()

ggplot

并收到错误。我只是想提高质量。你能给我一些建议吗?

1 个答案:

答案 0 :(得分:0)

您的问题是jpeg格式。 jpeg格式是“有损的”,意味着它保留所有颜色信息,但通过选择性地丢弃数据来压缩文件大小 - 并且压缩可能导致质量损失。您可以通过提高质量参数来减少压缩量,但jpg格式对于包含文本的图像来说真的不是最好的。

除非jpeg格式对您至关重要,否则您应使用基于矢量的格式,例如pdf

pdf(file = "somewhere/method_1/...")
xyplot(cali_plot, auto.key = list(columns = 2))
dev.off()