在R中使用plot()和lines()连接平均值的移动线
在R中使用plot()和lines()连接平均值的移动线，可以通过以下步骤实现：
- 首先，需要准备数据集，包含需要绘制移动线的数据。假设我们有一个名为data的数据框，其中包含了需要绘制移动线的变量。
- 使用plot()函数绘制数据的散点图。可以使用以下代码实现：
plot(data$X, data$Y, type = "p", main = "Scatter Plot", xlab = "X", ylab = "Y")其中，data$X和data$Y分别表示数据框data中的X和Y变量。
- 计算平均值的移动线。可以使用rollmean()函数计算移动平均值，并使用lines()函数将移动线添加到散点图中。以下是示例代码：
library(zoo)
mov_avg <- rollmean(data$Y, k = 5, fill = NA) # 计算移动平均值，k表示移动窗口大小
lines(data$X, mov_avg, col = "red", lwd = 2) # 将移动线添加到散点图中，col表示线的颜色，lwd表示线的宽度这里使用了zoo包中的rollmean()函数来计算移动平均值。
- 最后，可以通过调整plot()和lines()函数的参数来美化图形，例如添加标题、坐标轴标签等。
总结： 在R中使用plot()和lines()连接平均值的移动线，可以通过准备数据集、绘制散点图、计算移动平均值并添加移动线的方式实现。这种方法可以帮助我们观察数据的趋势和变化，特别适用于时间序列数据分析、趋势预测等领域。
推荐的腾讯云相关产品和产品介绍链接地址：
- 腾讯云服务器（云服务器产品介绍链接：https://cloud.tencent.com/product/cvm）
- 腾讯云数据库（云数据库产品介绍链接：https://cloud.tencent.com/product/cdb）
- 腾讯云人工智能（人工智能产品介绍链接：https://cloud.tencent.com/product/ai）
- 腾讯云物联网（物联网产品介绍链接：https://cloud.tencent.com/product/iotexplorer）
- 腾讯云移动开发（移动开发产品介绍链接：https://cloud.tencent.com/product/mobdev）
- 腾讯云存储（对象存储产品介绍链接：https://cloud.tencent.com/product/cos）
- 腾讯云区块链（区块链产品介绍链接：https://cloud.tencent.com/product/baas）
- 腾讯云元宇宙（元宇宙产品介绍链接：https://cloud.tencent.com/product/mu）
请注意，以上链接仅供参考，具体选择适合的产品需根据实际需求和情况进行评估和决策。
相关·内容
1回答
如何使用不同周期的不同长度参数计算R中的移动平均值(或其他技术指标)？
require(quantmod)
library(chron)
library(caTools)
## rm(list = ls())
# Get the data
from.dat <- as.Date("2015-01-01")
#to.dat <- as.Date("2000-01-01")
ES <- getSymbols("^GSPC" , from = from.dat,auto.assign = FALSE) # to today
浏览 0提问于2015-11-30得票数 0
1回答
在R中，我正在与整个绘图作斗争，我希望在彼此下面有两个图表，并将它们单独格式化。此外，我还想给每个人加上一个移动平均线。我怎么能这么做？我设法把它们画在了下面，但我仍然在与移动平均线作斗争。作为一个可复制代码的例子，我使用了间谍和苹果数据。
getSymbols("SPY")
getSymbols("AAPL")
par(mfrow=2:1)
plot(SPY, main="SPY")
plot(AAPL,main="AAPL")
我如何将它们单独格式化呢？不要在两张图表上显示网格线？
浏览 0提问于2013-10-30得票数 0
回答已采纳
1回答
用Hough变换自动去除直线
、、、、
我正在写一篇关于光学字符识别的论文。我的工作是正确分割文字字符和图像。
问题是，这种语言中的每一行文字都有单词，其中字符通常是用直线连接起来的。这些线的厚度可能相等，也可能不一样。
到目前为止，使用投影配置文件，我已经能够分割字符，没有附加到任何直线。但是要分割用直线连接的字符，我必须删除这些线。我更喜欢使用Hough变换来检测和删除这些线条(在BW图像中，如果线条中的像素是黑色的，则将其变为白色)。
参见包含文本的示例图像：
是利用投影轮廓从上面的图像中分割出来的一条线。
是利用Hough变换得到的检测线。
霍夫变换的代码。使用映像来测试它。
I = imread('line0.jp
浏览 1提问于2018-06-07得票数 2
回答已采纳
1回答
我想让matplolib图形上的线条具有动画效果，如下所示： ? 只有水平线让我感兴趣。 我做了一个函数，像上面的模型中那样动画一条线： def animate(i):
line.set_ydata(0 - np.exp(i/20))
return line,
line, = ax.plot((-100, 100), (0,0), 'r', lw=1)
ani = animation.FuncAnimation(fig, animate, frames=np.linspace(0, 78, 79), blit=True, interval=20,
浏览 25提问于2021-01-17得票数 1
回答已采纳
我正在使用Flot图表，我想用一个线数据系列和一个点数据系列来绘制一个图表。一个数组画一条线，一个数组画点。
但是，我不能做到这一点？
$.plot("#placeholder", [
{ data: prices, label: "Prices" },
{ data: average, label: "Average", yaxis: 2 },
{ data: error, label: "Error", ya
浏览 2提问于2017-08-17得票数 1
回答已采纳
1回答
我一直在练习这些图形，以及如何使用以下代码在R中绘制图形
theta = 1:100
x = sin(theta)
y = cos(theta)
op = par(bg = 'white', mar = rep(1, 4))
plot.new()
plot(x,y)
plot.window(xlim = c(-1, 1), ylim = c(-1, 1))
lines(x, y, col = hsv(0.95, 1, 1))
要获得以下输出
现在，我想要跟踪这些线是如何准确地连接起来形成这个模式的，因此使用了以下代码。
theta = 1:3
x = sin(theta)
浏览 5提问于2018-02-28得票数 0
回答已采纳
我试图找到所有的直线(垂直或对角线)在图像中使用Matlab。问题是它包括任何一条线，甚至是水平线。这是我的密码。我怎样才能检测到以下图像中的所有直线(它们可以在45到115度之间)？
function [linesnum, avg]= hh(inp_file,tresh)
I = imread(inp_file);
BW = edge(I,'canny');
% [H,T,R] = hough(BW,'Theta', 45:0.5:90); % it has no efect
[H,T,R] = hough(BW);
P = houghpeaks(H
浏览 3提问于2016-08-10得票数 1
1回答
将永久等高线添加到R中的曲面图中
、、、、
我正在使用R中的plotly包来绘制曲面图和等高线图： # Load package
library(plotly)
# Simulate the data for plotting
x <- y <- seq(from = 0, to = 100, by = 1)
z1 <- outer(X = x, Y = y, FUN = function(x, y) x^0.2 * y^0.3) # data for surface plot
# Draw surface plot (3D)
plotly::plot_ly(z = z1) %>%
plotly::ad
浏览 22提问于2020-12-18得票数 0
回答已采纳
我正在尝试显示数据集的平均值和标准差，其中我希望将std显示为带状。数据集分为三组，其中平均值按预期以三种不同的颜色显示，但std-ribbon不是。
代码：
mtcars$cyl <- as.factor(mtcars$cyl)
plot1 <- ggplot(mtcars, aes(x=gear, y=hp, color=cyl)) + geom_point() +
stat_summary(geom='ribbon', fun.data = mean_cl_normal, fun.args=list(conf.int=0.95)) +
浏览 14提问于2019-07-18得票数 0
回答已采纳
2回答
我已经检查了所有地方，人们都提到了我不能理解的例子(是的，我有点慢)。谁能解释一下如何在R中建立一条对数趋势线？
下面是一个工作示例：
myds <- c(23.0415,13.1965,10.4110,12.2560,9.5910,10.7160,9.9665,8.5845,8.9855,8.8920,10.3425,9.3820,9.0860,9.6870,8.5635,9.0755,8.5960,7.9485,8.3235,8.1910)
plot(myds)
我找不到一种简单的方法来应用回归趋势线。我对对数和线性趋势线特别感兴趣。可以不连接任何新的包吗？
好先生们，请多多指教！
浏览 0提问于2016-03-02得票数 2
回答已采纳
2回答
我有一个看起来像这样的data.frame (df)
mean t value
0.004 3.12
0.021 3.41
. .
. .
-0.067 -3.60
我的实际data.frame有90列(90个均值和90个t值)
现在我绘制了第一列中的值(均值)。
mean<-df$mean
timestamp<-seq(from=-30, to=60)
plot(mean~timestamp, type="h", lwd=2, col=&#
浏览 2提问于2018-03-02得票数 0
1回答
当我的信号的值大于这个信号的平均值时，我想在图上画一条线。我的信号是肌肉拉力和放松的简单连接。
muscle_on2 = np.random.uniform(-1, 1, 1000) + offs
muscle_off = np.random.uniform(-0.05, 0.05, 500) + offs
emg = np.concatenate([muscle_off, muscle_on1, muscle_off, muscle_on2, muscle_off])
为了做到这一点，我尝试了这样的方法：
pl.plot(x_axis)
for i in range(0, len(emg),
浏览 0提问于2020-01-15得票数 1
回答已采纳
2回答
我试图使用R中的raster包从光栅对象中提取轮廓线。
rasterToContour看起来工作得很好，绘制得很好，但是当被调查的时候，轮廓线被分割成不规则的部分。来自?rasterToContour的示例数据
library(raster)
f <- system.file("external/test.grd", package="raster")
r <- raster(f)
x <- rasterToContour(r)
class(x)
plot(r)
plot(x, add=TRUE)
我正在尝试提取栅格中样本站点的轮廓
浏览 6提问于2021-05-18得票数 3
回答已采纳
1回答
我想给一个阴谋打个电话。当较小的移动平均线(21)超过较长的移动平均线(34)时，该呼叫应该是“买入”，而当较小的移动平均线在较长的移动平均线下交叉时，该呼叫应该是“卖出”。
我有一栏平均价格。我使用rolling()函数计算了21天和34天的滚动平均值，并用matplotlib绘制了所有三列的线图:平均价格、sma_21和sma_34。我想在情节上放个记号。
如果较小的移动平均线(21)与较长的移动平均线(34)相交，我需要将这个移动平均线放置为"^“，如果较小的移动平均线位于较长的移动平均线之下，我需要将这个移动平均线放置为"v”。
averageprice = [
浏览 0提问于2019-07-07得票数 2
我试图使用R中的lines()函数绘制正态分布的拟合线，但它产生了一个错误。数据是SP500，我正在尝试比较SP500的对数回报分布与具有计算平均值和标准差的正态分布。
SP500_R = diff(log(SP500['2008/2009']))
# compare the log return with normal distribution using dnorm function
mu = mean(SP500_R, na.rm=T)
sigma = sd(SP500_R, na.rm=T)
hist(SP500_R, nclass = 20, probabilit
浏览 4提问于2019-06-23得票数 1
我需要在matplotlib中做一个动画，我想绘制一个移动的粒子(作为一个点)和一条线(对应于它的速度的大小和方向)。
我已经看过这个网站了，有不同的动画例子。
基本上，他们在示例中所做的是将line初始化为具有某些标记的绘图：
line, = ax.plot([], [], 'o') # for points
line2, = ax.plot([], [], '-') # for lines
在animate函数中，它们仅使用set_data来更新下一帧的粒子位置def animate(i)：line.set_data(x，y)返回线，
然而，在示例中，
浏览 4提问于2017-08-07得票数 1
回答已采纳
我一直在做一些线性回归，我想在图例中的同一条线上绘制标记(原始数据)和线(回归)。为了简单起见，这里是一个假回归：
from pylab import *
ax = subplot(1,1,1)
p1, = ax.plot([1,2,3,4,5,6],'r-', label="line 1")
p2, = ax.plot([6,5,4,3,2,1],'b-', label="line 2")
p3, = ax.plot([1.2,1.8,3.1,4.1,4.8,5.9],'ro', label="dots
浏览 1提问于2014-02-07得票数 6
我正试着在R studio中画3张图。平均值= 90，标准差= 5，平均值= 90，标准差= 2，平均值= 90，标准差= 1。
我知道如何画一个图，使用下面的语法，
x <- seq(1,180)
y <- dnorm(x,mean=90, sd=25)
plot(x,y, type="l", lwd=1)
但不确定如何添加另外两个图表。
浏览 1提问于2016-02-09得票数 1
我想要创建一个交互式的python情节。我有两个数据文件，它们是通过列名链接的。当我在plot1中选择一个栏时，我想在图2中显示属于该列的dataframe2 (df2)的数据。例如，df1可以包含df2所有列的平均值。如果单击显示的平均值，您可以在第二个图中看到构成平均值基础的rawdata。不幸的是，我无法让它发挥作用，我也找不到类似的例子。下面是我到目前为止的情况。我假设错误在mycolumn="@colnames"中，而taptool没有返回我所期望的内容。下面的源代码根据@bigreddot的注释更新
import pandas as pd
import numpy
浏览 0提问于2018-02-05得票数 3
回答已采纳
1回答
我是" R“的一个非常新的用户，我有一个问题。我目前正在制作R上的2D直方图。材料不一定重要，但我如何在2D直方图上绘制平均线。我正在运行的代码是：
load("mydatabin.RData")
# Color housekeeping
library(RColorBrewer)
rf <- colorRampPalette(rev(brewer.pal(11,'Spectral')))
r <- rf(32)
# Create normally distributed data for plotting
x <- mydata$A
浏览 0提问于2017-06-30得票数 1
我有一个与此代码相关的问题：
t = -20:0.1:20;
plot3(zeros(size(t)),t,-t.^2);
grid on
hold on
i = 1;
h = plot3([0 0],[0 t(i)],[0 -t(i)^2],'r');
h1 = plot3([-1 0],[0 0],[-400 -200],'g');
for(i=2:length(t))
set(h,'xdata',[-1 0],'ydata',[0 t(i)],'zdata',[-400 -t(i)^2]);
浏览 4提问于2010-10-13得票数 1
1回答
我在R中有5个国家的[-1,1]值数据集，即(A,B,C,D,E)，如下所示：
data <- matrix(runif(n=50, min = -1, max = 1),ncol = 5)
data <- round(data,2)
colnames(data) <-
c("A", "B", "C", "D", "E")
然后，我计算所有国家每一行的平均值如下：
aver <- as.matrix(rowMeans(data))
rownames(aver) <- c("
浏览 3提问于2022-06-06得票数 0
回答已采纳
1回答
如何在R中实际添加趋势线
、、、
我有一个简单的应用程序，在闪亮，我想增加趋势线。我知道如何使用lm和abline函数添加一个线性趋势线，但我如何在R中添加趋势线，仅使用Plotly。
library(shiny)
library(plotly)
library(shinyWidgets)
set.seed(666)
df1 <- data.frame(Date = rep(seq(as.Date("2020-01-03"), by="day", len=12),10,replace = TRUE),
Product = rep(LETTE
浏览 2提问于2021-03-02得票数 0
回答已采纳
我正在使用High图表的Char，我想知道是否有一种方法可以显示平均线( show )的值，在“yAxis”中显示值，或者鼠标悬停显示一个对话框，以显示该绘图线的确切值。
我已经显示了平均值，但无法读取图形上的确切的值。
这是海图上的PlotLines
plotLines: [{
color: 'red',
value: avg, // Insert your average here
width: '1',
zIndex: 2 // To not get stuck below the regular plot lines
}]
浏览 4提问于2017-08-21得票数 2
回答已采纳
1回答
我正在尝试使用R可视化虚拟房间中多个参与者的轨迹。我有一个参与者从右侧(黑色方块)进入，并向左侧移动，那里有一个出口门(红色方块)。有时在房间(圆圈)中间有一个障碍物，参与者绕过它。为了在同一张图(即多条线)上可视化多个参与者的轨迹，我使用函数图设置了图本身(和第一条线)，然后我使用函数线添加了其他轨迹。下面你可以看到一个有两条线的例子；在实验中，我有更多的线(因为我现在已经从大约20个参与者那里收集了数据)。 library(shape)
# black line
pos_x <- c(5.04,4.68,4.39,4.09,3.73,3.37,3.07,2.77,2.47,2.1
浏览 35提问于2020-12-17得票数 1
回答已采纳
在python中，我想使用：
from pylab import *
然后使用本模块中提供的plot。然而，我绘制的曲线并不是我想要的：
假设有两个列表：
x = [1, 2, 3, 4]
y = [1.4, 5.6, 6, 3.5]
我正在寻找一种可以绘制以下图表的plot方法：
绘制一条连接点的线：(1, 0)和(1, 1.4)
绘制一条连接点的线：(2, 0)和(2, 5.6)
绘制一条连接点的线：(3, 0)和(3, 6)
绘制一条连接点的线：(4, 0)和(4, 3.5)
..。
例如:它应该像图一样绘制谱，比如R中的plot(x, type='h')。我想我使用的p
浏览 0提问于2010-09-16得票数 1
回答已采纳
我想从一个pandas数据框中绘制多条线，并为每条线设置不同的选项。我想做一些像这样的事情
testdataframe=pd.DataFrame(np.arange(12).reshape(4,3))
testdataframe.plot(style=['s-','o-','^-'],color=['b','r','y'],linewidth=[2,1,1])
这将引发一些错误消息：
在list中定义颜色时，无法使用list样式调用list线宽我不能使用's‘和'o’或任何其他字母符
浏览 57提问于2013-01-06得票数 41
回答已采纳
我有一个由面绘制和分隔的数据库。第一行(行a)的面片需要在0.5处画一条水平线，而第二行(行b)的面片需要在1处画一条线，我已经部分实现了跟随的目标。然而，在0.5和1的水平线出现在所有方面。
library(ggplot2)
#Data
values <- c(0.4, 0.6, 0.9, 1.1)
Column <- c("UW", "LW", "UW", "LW")
Row <- c("a", "a", "b", "b")
DF <-
浏览 3提问于2021-03-16得票数 0
回答已采纳
我正在学习使用Matplotlib可视化数据，我想以一种非常定制的方式绘制一条线。我是新加入Matplotlib的，我不知道我想做什么甚至是可能的。下面是：
设置:假设您有一组随机(x，y)点作为直线图。为了说明的目的，我把4个不同的线条图压缩成一个图，但是想象一下下面的4行线中的每一行都被分成了各自的情节。
步骤1)对于每个线图A，B，C，D到全局最大值，并称它为"X“。
第四步可能吗？)画一条连接"X“和"Y”的线。可以在matplotlib中画出这条线吗？谢谢。
有关守则如下：
import pandas as pd
import numpy as np
df
浏览 4提问于2021-01-12得票数 1
回答已采纳
我正在使用python中的matplotlib绘制直方图，并希望绘制一条表示数据集的平均值的线，作为虚线覆盖在直方图上(或者其他颜色也可以)。你对如何在直方图上画一条线有什么想法吗？
我正在使用plot()命令，但不确定如何绘制垂直线(例如，我应该为y轴指定什么值？
谢谢!
浏览 0提问于2013-04-24得票数 85
回答已采纳
我想将平均值和标准误差绘制为水平条形图，并希望对平均值进行排序。
我已经找到了使用网格绘制水平排序条形图的方法，但我不知道如何添加错误标记。以下是我的数据和我想出来的R码。
data <- structure(c(0.67, 0.67, 0.76, 0.66, 0.71, 0.6, 0.52, 0.6, 0.71, 0.76,
0.76, 0.71, 0.6, 0.61, 0.9, 0.5, 0.58, 0.84, 0.68, 0.88,
0.89, 0.96, 1, 0.95, 1, 1, 0.98, 0.78, 0.98, 1,
1, 0.99, 1, 1, 0.95, 0.92
浏览 3提问于2010-03-05得票数 6
回答已采纳
1回答
我有一个栅格(矩阵)，我想要计算每个纬度对应的所有值的平均值。
library (raster)
r <- raster(nrows=10, ncols=10)
r <- setValues(r, 1:ncell(r))
extent(r) = extent(c(xmn=-180,xmx=180,ymn=-90,ymx=90))
plot(r)
给予：
所以我现在要做平均值，在每个纬度上只得到一个值，如下所示：
其中，R是在栅格中表示的值(请注意，它们在值方面是不同的)。
浏览 1提问于2014-07-21得票数 0
回答已采纳
4回答
我需要在for循环中计算数据序列的移动平均值。我必须得到N=9天数的移动平均值。我正在计算的数组是4系列365个值(M)，它们本身就是另一组数据的平均值。我想将我的数据的平均值与移动平均值绘制在一张图中。
我在谷歌上搜索了一下移动平均值和"conv“命令，发现了一些我尝试在代码中实现的内容：
hold on
for ii=1:4;
M=mean(C{ii},2)
wts = [1/24;repmat(1/12,11,1);1/24];
Ms=conv(M,wts,'valid')
plot(M)
plot(Ms,'r
浏览 0提问于2014-09-24得票数 3
1回答
我是一个新手，在R编程方面大器晚成，这也是我在后台搜索和学习一年后第一次在这里提出这个问题。
我正在尝试同时学习R编程和统计学。当我们给样本添加一个常数并重新计算它的平均值时，我们会看到平均值会根据我们添加的常数向右或向左移动。所以我想把这些知识和R结合起来，并在图中展示出来。
我在下面创建了自己的data.frame：
x1 <- c(1, 2, 2, 3, 3, 3, 4, 4, 5)
x1.name <- "sample.1"
df <- data.frame(x1)
names(df) <- c(x1.name)
df <- df %>
浏览 0提问于2018-09-09得票数 0
学习R语言-我知道如何做移动平均，但我需要做更多-但我不是一个统计学家-不幸的是，所有的文档似乎都是为统计学家写的。
我在excel中做了很多这方面的工作，它对于分析运营活动非常方便。
下面是每行上要生成的字段
值可以是呼叫数、投诉率等任何值
TimeStamp | Value |移动平均值|移动标准差|下部控件|上部控件
简而言之，移动的avg和stdevP指向序列中的前8个左右的值。给定时间点的下部控件=移动平均-2*移动stdevP，上部控件=移动平均+2*移动stdevP
这可以很容易地在excel中完成单个文件，但如果我能找到一种方法使R工作，R将更好地满足我的需要。希望自动化时也能
浏览 6提问于2010-09-09得票数 4
回答已采纳
1回答
我试图检测到以下图像中的所有线条：
使用下面的代码，我能够检测到几乎所有的行：
%Find the line detected
I = imread('img3.png');
J = histeq(I);
BW = edge(J,'canny');
[H,T,R] = hough(BW);
P = houghpeaks(H,30,'Threshold',0.7*max(H(:)),'nhoodsize',[5 5]);
lines = houghlines(BW,T,R,P );
figure, imshow(I, []
浏览 4提问于2022-03-06得票数 2
回答已采纳
3回答
我使用gnuplot来做以下事情。我有n个方程，我想根据Xaxes值绘制它们。这是一个示例
set xrange[0:25]
f1(x) = x
f2(x) = 3*x
f3(x) = 10*x
plot (x>0)&&(x<10)?f1(x):(x<20)?f2(x):f3(x)
我知道我们可以使用下面的代码轻松地设置线条的颜色。但它改变了整个颜色
set style line 1 lt 1 lw 3 pt 3 lc rgb "blue"
但我想要的是让连接线变成不同的颜色。也就是说，如果你画出上面的图，你会画5条线。3条原始线(来自函数)和
浏览 1提问于2014-02-26得票数 2
1回答
我在DataCamp中关注了一些关于R的类，有时当我将代码从datacamp复制到R-studio时，我会遇到问题，但通常，我会在这里或一般在线上找到答案。然而，这一次我不明白错误是什么，也不知道如何修复它。当我在R-studio中运行以下代码将这条线添加到直方图中时，我得到了太多的线，而不是在Datacamp中得到的一条线。代码如下： library(qrmdata)
# Load DJ index
data("DJ")
DJX <- diff(log(DJ))["2008/2009"]
djx <- unclass(DJX)
# Calc
浏览 17提问于2019-03-12得票数 0
回答已采纳
3回答
我需要帮助在我已经能够绘制的数据上绘制移动平均线(见下文)
我试图使m(我的移动平均线)等于y(我的数据)的长度，然后在我的' for‘循环中，我似乎对我的移动平均线有了正确的数学计算。
工作原理:绘制x和y
不起作用的地方:在x&y上绘制m，并给出这个错误
RuntimeWarning:在double_scalars中遇到无效值
我的理论是:我将m设置为np.arrays = y.shape，然后创建我的for循环，使m等于循环中设置的数学值，从而将所有0替换为移动平均值
import numpy as np
import matplotlib.pyplot as plt
i
浏览 3提问于2013-08-18得票数 3
我正在使用matplotlib在Python中使用以下代码来生成具有大量重叠线的绘图：
def a_run(n, t, s):
xaxis = np.arange(t, dtype=float)
#Scale x-axis by the step size
for i in xaxis:
xaxis[i]=(xaxis[i]*s)
for j in range(n):
result = a_solve(t,s)
plt.plot(result[:,1], color = 'r', alpha=0.1
浏览 0提问于2013-01-26得票数 1
我有以下matplotlib片段：
fig, ax = plt.subplots(figsize=(6,6))
values = np.random.normal(loc=0, scale=1, size=10)
ax.plot(range(10), values, 'r^', markersize=15, alpha=0.4);
产
按计划进行。
我想让这条线看不见的地方，它与点重叠，这样点看起来更多的连接线，而不是躺在线的顶部。这样做是有可能的，要么让线在重叠的地方不可见，要么创建一个新的线条对象来链接这些点，而不是跟踪它们？
为了明确起见，我不希望删除整条线，只
浏览 0提问于2018-03-21得票数 1
我试图在R中的一个图上画两条线，数据与死囚有关，CSV有三列:第一列是年份，第二列是死囚人数，第三列是当年执行死刑的人数。
我已经到了可以用X轴画两条线的地方，但是Y是混乱的，因为值的范围是互相重叠的。
例如，每年都是这样的：
...
Year: 1968 Population: 1244 Executions: 34
Year: 1969 Population: 1456 Executions: 11
...
注意人口和处决之间的巨大差异。
我一直在查这个：
deathrow <- read.csv("death_row_by_year.csv", sep=",
浏览 2提问于2013-10-17得票数 0
回答已采纳
1回答
我已经创建了一个plot，其中不同lines上的points对通过线路segments连接。一组点由开放的圆表示。连接到这些开放圆之一的线的端点在该圆内可见。这会创建一个牛眼的外观。我希望这条线在开放的圆圈内是不可见的。我是否可以更改直线的优先级，使其位于开放圆圈之后，并被开放圆圈遮挡？或者，也许可以创建由白色填充的开放圆？
如果这是一个重复的问题，很抱歉。我更喜欢在base R中使用黑白绘图。
下面是我的R代码，其中包含一些过大的点来说明这个问题：
x <- seq(60,80)
fitted <- c(0.60, 0.70, 0.80, 0.20, 0.70, 0.60, 0
浏览 17提问于2020-05-26得票数 0
2回答
R(正常和对数数据)中的线性回归
、、、、
我想在R中对正常和双对数图中的数据进行线性回归。
对于普通数据，数据集可能是以下内容：
lin <- data.frame(x = c(0:6), y = c(0.3, 0.1, 0.9, 3.1, 5, 4.9, 6.2))
plot (lin$x, lin$y)
在这里，我只想为数据点2、3和4的线性回归画一条线。
对于双对数数据，数据集可能如下：
data = data.frame(
x=c(1:15),
y=c(
1.000, 0.742, 0.623, 0.550, 0.500, 0.462, 0.433,
0.051, 0.04
浏览 1提问于2011-06-08得票数 7
回答已采纳
3回答
我正在构建一个R函数来绘制数据表中的几行，我不明白为什么这不起作用？
data = read.table(path, header=TRUE);
plot(data$noop);
lines(data$noop, col="blue");
lines(data$plus, col="green");
我正在从我拥有的文件中读取数据，该文件的格式如下：
noop plus mins
33.3 33.3 33.3
30.0 40.0 30.0
25.0
浏览 0提问于2011-10-27得票数 6
回答已采纳
我对编程不是很熟悉，我刚刚开始使用R，我正在尝试使用下面的代码在一个形状文件中绘制几条线(这里只使用了两条带有起点和终点坐标的线作为例子)。
library(sp)
library(raster)
lat1<- c(-0.755488889, -0.724580556)
long1<- c(36.44060833, 36.43528056)
latlon1<- cbind(lat1,long1)
crdref <- CRS('+proj=longlat +datum=WGS84')
lns1_YGLV <- spLines(latlon1, cr
浏览 3提问于2016-10-15得票数 1
我想在R图的对数-对数轴上拟合一条线性趋势线。以下是示例代码： a<-c(1:20);
b<-c(21:40);
plot(a,b,log='xy');
fit<-lm(b~a);
abline(fit,col="blue",lwd=2); 然而，它无法绘制趋势线。
浏览 33提问于2019-09-14得票数 0
在一次任务中，我被要求这样做：
对于(shape=5，rate=1)、(shape=50，rate=10)、(shape=.5，rate=.1)的值，绘制大小为10000的随机样本的直方图。使用密度直方图而不是频率直方图，这样您就可以为人口密度添加一条线(提示:您将使用rgamma和dgamma来绘制此图)。为总体和样本均值添加一条population。另外，添加一个副标题来报告总体方差和样本方差。
我当前的代码如下所示：
library(ggplot2)
set.seed(1234)
x = seq(1, 1000)
s = 5
r = 1
plot(x, dgamma(x, shape
浏览 85提问于2018-07-25得票数 0
回答已采纳
2回答
我想选择在一定距离内的栅格单元(例如，1公里或5公里)的多边形边界。我最终想要的只是那些栅格细胞的平均值，这些格格距离shapefile内部的边界是在指定的范围内。
我认为我的方法是向内创建一个负缓冲区，并减去原始多边形和缓冲区。然后用新的多边形掩蔽和裁剪光栅，并取平均值。
下面是演示我想要做的事情的样本数据。
library(raster)
# raster
r <- raster(xmn=1035792, xmx= 1116792, ymn=825303.6, ymx=937803.6, resolution = 12.5,crs = "+init=epsg:3174
浏览 15提问于2022-10-09得票数 1
我正在使用plot_ly在R中创建一个线状图。默认情况下，这条线一直运行到绘图区域的左边缘和右边缘。我想在这里添加一些空间，默认情况下在ggplot中是这样做的。有谁知道如何用plot_ly做这件事吗？
可复制的例子：
df <- data.frame(date = seq(as.Date('2021-01-01'), length=50, by='day'),
value = rnorm(50))
plot_ly(df, x=~date, y=~value) %>%
add_lines(color=I(&#
浏览 2提问于2021-03-25得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
