如何在Rpy2的ggplot2图中创建类似于"$\alpha$ + $\beta$ is my label"的x或y标签?我已经尝试使用r.expression获取情节上的任何希腊字母:
p = ggplot2.ggplot(mydata) + r.xlab(r.expression("alpha"))
但这是行不通的。如何将希腊字母绘制在常规文本的旁边?
我正在尝试构建一个用户定义的函数,它基本上是在一个图中返回多个函数曲线的g-图。该情节将是以下情节的复杂版本:
library(ggplot2)
p <- ggplot() + xlim(0,4) + xlab("x")
p <- p + geom_function(fun = function(x) 1*x)
p <- p + geom_function(fun = function(x) 2*x)
p <- p + geom_function(fun = function(x) 3*x)
p <- p + geom_function(
我正在教授一门统计学课程,我试图温和地向我的学生介绍R语法(具体地说,ggplot)。为此,我为许多基本命令创建了包装器函数。例如:
basic.plot.function = function(x,y, data=d){
p = ggplot(data, aes_string(x=x, y=y)) + geom_point() + geom_smooth()
print(p)
#dput(p) # this function isn't doing what I want it to
}
我希望该函数输出绘图(这就是print(p)所做的事情),但我还希望它将
我试着创建了一个闪亮的应用程序,你可以根据“selectizeInput”来选择ggplot的x轴。
我知道,这是通过预先选择所需的列来解决的。因为在我的例子中,数据结构有点复杂,当可以动态更改aes()中的x =属性时,我更愿意这样做。
为了更好地理解,我添加了一个最小的工作示例。不幸的是,ggplot使用输入作为值,而不是使用相应的列。
library(shiny)
library(ggplot2)
# Define UI for application that draws a histogram
ui <- shinyUI(fluidPage(
# Applicati
我正在运行一些模拟,我想在一个漂亮的ggplot中绘制结果,但是ggplot似乎不能处理列表对象。有人知道如何将结果粘贴到ggplot图表中吗?
N <- 8619170
nn <- c(1000, 1200, 3000)
p <- .27
nsim <- 100
phat <- list()
for (i in 1:length(nn)) {
n <- nn[i]
x <- rhyper(nsim, N * p, N * (1 - p), n)
phat[[
有没有一种方法可以使用ggplot将数学函数覆盖在数据之上?
## add ggplot2
library(ggplot2)
# function
eq = function(x){x*x}
# Data
x = (1:50)
y = eq(x)
# Make plot object
p = qplot(
x, y,
xlab = "X-axis",
ylab = "