在R中的照片对准图形
首先,我认为我需要在PowerPoint手动进行手动操作,然后我认为如果有解决方案,我可能会尝试使用R.这是我的示例数据: set.seed(123) myd
0 2023-05-25
编程技术问答社区
提升ggplot2的性能
ggplot2软件包很容易成为我使用过的最佳绘图系统,除了性能对较大的数据集(〜50k点)并不是很好.我正在考虑通过使用ggplot2作为绘图后端来提供Web分析,但我对性能并不满意,尤其是与基本图形相反.我的问题是是否有任何具体方法来提高这种表现. 起点是以下代码示例: library(ggplot2) n = 86400 # a day in seconds dat = data.frame(id = 1:n, val = sort(runif(n))) dev.new() gg_base = ggplot(dat, aes(x = id, y = val)) gg_point = gg_base + geom_point() gg_line = gg_base + geom_line() gg_both = gg_base + geom_point() + geom_line() benchplot(gg_point) benchplot(gg_line) be
0 2023-05-23
编程技术问答社区
使用ggplot绘制大量的时间序列。有可能加速吗?
我正在使用数千个气象时间序列数据(可以从此处下载示例数据) https://dl.dropboxusercontent.com/s/bxioonfzqa4np6y/timeSeries.txt 在我的Linux Mint PC上使用GGPLOT2绘制这些数据(64位,8GB RAM,双核2.6 GHz)花了很多时间.我想知道是否有一种方法可以加快速度或绘制这些数据的更好方法?非常感谢您提出任何建议! 这是我现在正在使用的代码 ############################################################################## #### load required libraries library(RCurl) library(reshape2) library(dplyr) library(ggplot2) ####################################################
0 2023-05-23
编程技术问答社区
在直方图中按仓位划分的百分比 ggplot
我有这样的数据集 - > library(ggplot2) response purchase gender 1 Yes Female 2 No Male 3 No Female 4 No Female 5 Yes Female 6 No Female 另外,因此您可以验证我的示例,这是我的特定采样的table(df). (请不用担心将我的百分比匹配)
2 2023-05-23
编程技术问答社区
GGPUBR和GGBARPLOT:如何将数据标签更改为百分比格式?
一个非常简单的问题(我是R的新手): 我已经使用ggpubr软件包创建了一个ggbarplot,虽然我可以将Y量表的格式化为百分比(例如80%而不是0.8),但我无法更改数据标签的格式. 这是代码: ggbarplot(x = "Trophic level", y = "percent.present", fill = "Structure type", color = "Structure type", position = position_dodge(), ylab = "% of species that used underpasses", ggtheme = theme_bw(), title = "Proportion of species in area that used underpa
12 2023-05-23
编程技术问答社区
ggplot2在shiny中的应用,改变后重新加载图像/图,无需完全重新创建。
我正在制作带有shiny的应用程序,该应用程序将允许用户单击以选择图像上的点.我正在使用ggplot2显示这些点作为图像上的红点. . 我的工作非常接近我想要的方式,除了用户单击一个新点时,整个图像都会重新加载*.理想情况下,我将每次点击重新绘制数据,但不会重新加载整个图像. 我的问题是,是否可以使情节点重新加载,但请单独放置背景图像(因为它不会在点击之间改变)? 我的实际应用程序比这更重要,但是这是我要解决的问题的最低可再现示例的最佳尝试(请注意,您需要调整image.file以指向JPG文件为了运行它,您的机器;我不知道如何使图像本身可重复,对不起): library( ggplot2 ) library( jpeg ) library( grid ) library( shiny ) #### pre-run setup #### # set up a function for loading an image file as a grob grob_im
8 2023-05-22
编程技术问答社区
在一个循环中绘制和保存PDF文件
我有一个半融合的数据框,看起来像这样: head(final_melt) Group Source variable value Control Whole Kidney MZF1 0.23879 Control Whole Kidney MZF1 0.49381 Control Whole Kidney MZF1 0.40827 Control Whole Kidney MZF1 0.55548 Control Whole Kidney MZF1 0.34664 Control Whole Kidney MZF1 0.68102 组有两个级别(对照和疾病),源有4个级别(整个肾脏,肾小球,肾小管间质和HK-2 + TGF-B).变量还具有四个级别(TFAP2A,MZF1,YY1,SP1). 我想在循环中做类似以下操作 d = subset(final_melt, final_melt$S
4 2023-05-22
编程技术问答社区
如何将ggforce::facet_grid_paginate的输出只保存在一个pdf中?
我正在使用 ggforce 软件包在几页上生成刻面图: library(ggforce) for(i in 1:6){ ggplot(diamonds) + geom_point(aes(carat, price), alpha = 0.1) + facet_wrap_paginate(~cut:clarity, ncol = 2, nrow = 2, page = i) ggsave(paste0("~/diamonds_", i, ".pdf")) } 生成预期的6个PDF文件: 一个单个PDF 中的输出最简单的方法是什么? ? 我知道可以使用reports和pdftools软件包来完成此操作,但是我想知道是否有一种更直接的方法来完成此操作.我希望GGFORCE提供单页输出的功能,但看起来并非如此? 解决方案 您甚至不需要使用ggsave您可以将所有这些图都放入一个pdf by: pdf("~/diamonds_al
0 2023-05-22
编程技术问答社区
使用R从多个.csv文件中绘制多个图形
我是R的新手,遇到了一个我无法根据我的知识/书籍/互联网解决的问题. 所以这是问题: 我有60个CSV文件,为此我要绘制每个散点图. 它们的格式都一样,因此我(理论上)应该能够以一个不错的循环解决此任务. 这是我的代码: library(tools) library(ggplot2) files = dir('~/Klima_hist_CPL/tillnov/ClimDatK1/*.csv') for (Y in list.files(path = "~/Klima_hist_CPL/tillnov/ClimDatK1/",pattern =".csv", all.files = FALSE, full.names = TRUE, recursive = FALSE, ignore.case = FALSE, include.dirs = FALSE, no.. = FALSE)){ myData
0 2023-05-22
编程技术问答社区
如何在GGPLOT2图表中删除边距
我目前正在使用GGPLOT2为乳胶文档创建图,并发现GGPLOT2增加了许多不需要的边距: plot.background=element_rect(fill="red")涂上红色: 左边的小边距 图像和传说之间的边距很小 用photoshop绘制的紫罗兰色: 左侧和右边的边距 底部的1px边距 删除这些利润需要哪些规则? Google所有这些配置选项真的很困难.这是我的实际图表: library(ggplot2) library(scales) label
2 2023-05-22
编程技术问答社区
在Shiny R中的单个PDF中保存多个图画
我正在尝试使用下载处理程序将闪亮应用程序中的ggplots导出到一个PDF文件中,但它不起作用. PDF文件已被保存,但它仅给了我最后一个GGPLOT,而不是所有三个GGPLOT.任何帮助将不胜感激! 以下是服务器的代码: shinyServer(function(input, output, session) { plotinput() { df
0 2023-05-22
编程技术问答社区
R ggplot2: 使用pdf()和ggplot_gtable()/ggplot_build()绘图前出现空白页
我需要修改图的某些注释,因此我必须保存ggplot2图并做 ggplot_build(plot.obj) 然后用 绘制它 plot(ggplot_gtable(ggplot_build(plot.obj))) 问题是,当我将其保存在PDF中时 pdf(file="test.pdf") plot(ggplot_gtable(ggplot_build(plot.obj))) dev.off() 生成的PDF在绘图页面之前有一个空白页面...我如何避免此? 检查此MWE data(iris) library(ggplot2) box
0 2023-05-22
编程技术问答社区
怎样才能更快地创建一个1000页的pdf?
我需要使用R中的ggplot2将超过1000页绘制到PDF文件.除了以下代码以外,任何更快的方法: library(ggplot2) data(diamonds) pdf("name.pdf", width = 6, height = 6) for(i in 1:1000) { p1
0 2023-05-22
编程技术问答社区