标签: plot

我有三个函数以不同的方式执行相同的任务：

功能一：

f1 <- function(n) {
  sum = 0
  for(i in 1:n) {
    sum <- sum + a(i)
  }
  return(sum)
}

功能2：

f4 <- function(n) {
  sum = 0
  for(i in 1:n) {
    sum <- sum + b(i)
  }
  return(sum)
}

功能3：

f3 <- function(n) {
  #Done using lgamma
  sum = 0
  for(i in 1:n) {
    sum = sum + c(i)
  }
  return(sum)
}

user我需要使用time from绘制这 3 个函数在值 1 - n 范围内的运行时间system.time。在 R 中如何做到这一点？

我有这个嵌套列表：

acc = [[3, 0.95804195804195802], [4, 0.965034965034965], [5, 0.97202797202797198], [6, 0.97202797202797198]]

这段代码应该绘制这些值并将 y 轴的边界设置为 95 和 100：

import matplotlib.pyplot as plt

x_ = [x[0] for x in acc]
y_ = [x[1] for x in acc]

plt.figure(figsize=(8,6))
plt.scatter(x_, y_)
plt.ylim((95, 100))
plt.show()

但我收到此错误，我不明白为什么：

---------------------------------------------------------------------------
TypeError                                 Traceback (most recent call last)
<ipython-input-193-5a9016a37585> in <module>()
     19 plt.figure(figsize=(8,6))
     20 plt.scatter(x_, y_)
---> 21 plt.ylim((95, 98))
     22 plt.show()

TypeError: 'float' object is not callable

如何将点放在seaborn条形图上？以下代码生成条形图。

import matplotlib.pyplot as plt
import seaborn
import matplotlib
matplotlib.use('TkAgg')
seaborn.set_context('talk')

data_df = pandas.DataFrame([3, 1, 2, 4], index=['a', 'b', 'c', 'd']).transpose()
points_df = pandas.DataFrame([3.5, 0.5, 1.75, 4.25], index=['a', 'b', 'c', 'd']).transpose()
plt.figure()
seaborn.barplot(data=data_df)

plt.show()

现在如何将数据添加到points_df该图表上作为红点？

我目前正在尝试使用 Rggalluvial包生成冲积图。我希望用它来绘制连续时间段（Seg1、Seg2、Seg3、Seg4）内不同值之间的多个连续迁移。在 Seg 1 中，所有案例都具有“workseg”值；在 Seg 2 处，该值可以是其他三个值之一（相关内容、不相关内容、NONE）；Seg3 和 Seg4 值可以是四个选项中的任何一个。

使用以下代码...

##Reorder levels per segment (make vertical order of strata levels identical 
across all axes, rather than "zig-zag" --> this is just an aesthetic 
preference)##

dRG.lode <- dRG %>%
  mutate(Seg2 = factor(Seg2, levels=c("workseg", "related content", 
"unrelated content", "NONE")),
         Seg3 = factor(Seg3, levels=c("workseg", "related content", 
"unrelated content", "NONE")),
         Seg4 = factor(Seg4, levels=c("workseg", "related content", 
"unrelated content", "NONE")))


##Plot##

ggplot(as.data.frame(dRG.lode),
       aes(axis1 = Seg1, axis2 = Seg2, axis3 = …

我有一个函数，假设f(theta, phi) = sqrt(1 - (sin(theta)*sin(phi))**2) + 5 * sqrt(1 - (sin(theta)*cos(phi))**2)我想在球体表面绘制颜色图。但是，我不知道如何splot在不首先生成表中包含适当值的文件的情况下将这个函数输入到其中以实现此目的。

我怎样才能gnuplot做到这一点？

我正在尝试创建一个图，其中在一个图中包含多个 geom_smooth 趋势线。我当前的代码如下：

png(filename="D:/Users/...", width = 10, height = 8, units = 'in', res = 300)
ggplot(Data) + 
  geom_smooth(aes(BA,BAgp1),colour="red",fill="red") + 
  geom_smooth(aes(BA,BAgp2),colour="turquoise",fill="turquoise") + 
  geom_smooth(aes(BA,BAgp3),colour="orange",fill="orange") + 
  xlab(bquote('Tree Basal Area ('~cm^2~')')) + 
  ylab(bquote('Predicted Basal Area Growth ('~cm^2~')')) + 
  labs(title = expression(paste("Other Softwoods")), subtitle = "Tree Level Basal Area Growth") +
  theme_bw()
dev.off()

产生以下图：

问题是我一生都无法包含一个简单的图例来标记每条趋势线代表的内容。该数据集非常大 - 如果它对于确定解决方案有价值，我将在外部发布到 Stackoverflow。

我有一个素食主义者的 CCA，正在尝试绘制它，但只得到一个非常基本的图，我想知道如何自定义图 - 更改物种单词和箭头的颜色，放入点，更改图上单词的大小...这是我用来制作 CCA 并绘制它的代码（在 Vegan 中）：

spe.cca <- cca(spdata~.,env)
plot(spe.cca, choices=c(1,2), display=c('sp','bp'), scaling=2)

spdata 是物种丰度信息，env 是环境数据矩阵。我只想在地块上显示环境变量和物种（而不是样本/站点）。

第一次提问，如有遗漏，请多多包涵。我对 R 还很陌生，但随着我了解更多，我会尝试贡献自己的力量。同时希望有人可以提供帮助。

我有一个 for 循环，可以根据我的数据生成多个图。这些图本身很完美，但是我正在努力将图 1 到 4 添加到单个图像中。

如果我使用plot()我可以使用par(mfrow - c(1,2,3,4)，但当我向每个图添加多个数据框（即geom_point()ggplot 中的多个数据框）时，我认为我无法做到这一点。

我的数据看起来像这样，但更长，N01、N02 等线有多个数据点，我正在使用 N01、N02 等的数据生成一个新图，并覆盖 WT1 和 WT2 点。

我想我可能需要将循环的每次迭代保存到新变量中，然后使用它multiplot()来获得我想要的结果。

如果我想出答案，我会发布，但如果有人比我先找到答案，请提前谢谢您。

N01 N01.01  0.0 7693\n2   N01 N01.02  2.0 3404\n3   N01 N01.03  2.0 3404\n4   N01 N01.04  1.0 6395\n5   N01 N01.05  1.0 5171\n6   N01 N01.06  2.0 6001\n7   N01 N01.07  1.0 6671\n8   N01 N01.08  1.5 6700\n9   N01 N01.09  1.0 9060\n10  N04 N04.01  2.0 6857\n11  N04 N04.02 …

我想根据每个数据帧中名为“types”的列为条形堆栈着色，但我不知道在哪里设置此参数（在 Plotly Express API 中有该参数color）。

奇怪的是，Plotly 已经用堆栈标记了条形图，但根据跟踪，[理所应当]以相同的方式对所有条形图着色：

from plotly.subplots import make_subplots
import plotly.graph_objects as go

fig = make_subplots(rows=1, cols=2)
fig.add_trace(go.Bar(x = grouped_A["Working Days"], y = grouped_A["Total"], 1, 1)
fig.add_trace(go.Bar(x = grouped_B["Working Days"], y = grouped_B["Total"], 1, 2)

fig.show()

我只想在输入为真时绘制一些 EMA。但是，当我使用 if 函数时，它显示“无法在本地范围内使用‘plot’”。

//@version=4
study(title = "Todos os indicadores", overlay = true)
showemas        = input(false,          title = "Show EMAs")

if showemas == true
    plot(ema(close, length1), color=#F44336, linewidth=2, title="EMA 1")
    plot(ema(close, length2), color=#4CAF50, linewidth=2, title="EMA 1")
    plot(ema(close, length3), color=#673AB7, linewidth=2, title="EMA 1")
    plot(ema(close, length4), color=#2196F3, linewidth=2, title="EMA 1")
    plot(ema(close, length5), color=color.white, linewidth=2, title="EMA 1")
    plot(sma(close, length6), color=color.orange, linewidth=2, title="EMA 1")