标签: plot

所以这是我的函数计算的PDF:

fx = 0.3 if(0 <= x <1)0.1 if(1 <= x <2)0.25 if(2 <= x <3)0.15 if(3 <= x <4)0.2 if(4 <= x < 5)否则为0

这是我的编码:

    fx = function(x)
    { 
    if ((0<=x) & (x<1)) 0.3
    else if ((1<=x) & (x<2)) 0.1
    else if ((2<=x) & (x<3)) 0.25
    else if ((3<=x) & (x<4)) 0.15
    else if ((4<=x) & (x<5)) 0.2
    else 0
    }

现在我将如何绘制y = fx？
我试过了:

    x <- runif(n,0,5)
    y <- fx(x)
    plot(x, y, type='1', xlim=c(0,5), ylim=c(0,5))

但是我得到一个'x'和'y'有不同长度的错误？

我使用R来绘制图例,但我需要绘制黑色边框.

plot.new()
legend(x=0,y=.15, c(" legend1"), cex=1,pt.cex =1.4,col=c("green"),bty="n",fill="green", pch=c(15, 15, 15, 17),border="black")
legend(x=.75,y=.15, " legend", cex=1, pt.cex =1.4,bty="n",col=c("black"), pch=c(17), border="black")

但在上面的代码中,没有按照预期在下面显示的图像打印黑色边框.我怎么能够

把边框(这里是黑色边框覆盖绿色框)和图例如下所示.

我在家里写了一些代码来绘制一些3D数据.它工作正常.现在我在办公室运行相同的代码,我得到了一些奇怪的错误.似乎插入的每个数据点都有一个标签.

但这只发生在一半的情节上.左图显示了真实数据,右图显示了这些数据的平滑拟合.左边的一个得到错误而另一个没有.

我在同事的机器上运行代码,它也运行良好.所以我将干净的图形文件保存在他的机器上并试图在我的电脑上打开它们.仍然是同样的错误.所以这不是代码,但似乎是一些奇怪的显示错误.有没有人看过这个？

figure(1);
s1=gca;
surf(t_matrix,f_matrix,alpha_matrix)
colorbar
figure(2);
s2=gca;
surf(t_matrix2,f_matrix2,alpha_matrix2)
colorbar

这只是这段代码.如果我调试,数字会在第一次调用colorbar后出现.但不是在第二种情况下.我在家里的Matlab版本是2013a,但在办公室和我的同事都是2012b.

假设我有X = {0,5.4,6.18,6.81,6.85,6.95,6.96,7.20,7.51}并且

Y = {0,4.84,5.52,6.00,6.12,6.21,6.23,6.34,6.61}.请帮我画两条线

使用MATLAB.Thanks将这些点放在一个单独的图中

我在R中有一个图,我的一个轴标记为 z^2

plot(log(b)~a, data=dat, pch=15, xlab="time", ylab="log(z^2)")

是否可以在没有符号"^"的情况下在R中写入电源？

我知道如何解释这个问题的最简单方法是使用图片,所以这里是:http: //pbrd.co/19RxqqV

为简单起见,原点是0,0,角度很容易使用,但它们可能是任何东西.对于这类问题我唯一真正了解的是圆的旋转,原点和半径,当然还有圆的新度/旋转.

这个问题,我认为是相似但不完全相同的事情: 在圆的边缘找到坐标

谢谢!我希望我的问题很清楚.

我在两个地块之间拆分屏幕,如下所示:

par(mfrow=c(1,2))
boxplot(cars[, 1])
plot(cars[, 2])

但我不想把屏幕分开到中间.我希望第一个"half"(带有boxplot的那个)是屏幕的1/3,而另一个图则占据另一个2/3.我怎么能做到这一点？

所以我有这个看起来像这样的情节:

x轴和y轴都是log,我如何拟合最小二乘回归线？这是我用来绘制图形的图:plot(log(counts),log ="x",type ="p")

count包含每个x的观察数...

我的数据看起来像这样

    df <- data.frame(c("Cell1","Cell2","NK-Cell"),c("K","L","S","L","K","S","S","L","K"),abs(log2(abs(rnorm(180)))))    
colnames(df) <- c("ctype","tissue","exp")

我正在尝试创建一个看起来像这样的情节.

根据Google的说法,在R中旋转绘图(使用以下旋转设置)似乎是不可能的.

所以我正在寻找一种方法来做到这一点,但直到现在仍然没有成功.

旋转设定:

• 旋转中心是图的起源({0,0})
• 给定角度将是y轴和图之间的角度.

这是一个代码在哪里

• a取决于角度和x轴长度.(我认为)
• b取决于角度和y轴长度.(我认为)

:

speed <- cars$speed
dist <- cars$dist
plot(speed,dist, xlim=c(0,121), ylim=c(0,121))


xTemp <- speed
speed <- speed + (a)
dist <- dist + (b)

par(new=TRUE)
plot(speed,dist, xlim=c(0,121), ylim=c(0,121), col="red")

任何想法a和b价值观？

这里是一个代码,其中绘图从y轴旋转了大约50度(注意,这不是真正的旋转.speed值在旋转后被扩展..我现在不知道如何修复它.):

speed <- cars$speed
dist <- cars$dist
plot(speed,dist, xlim=c(0,121), ylim=c(0,121))


xTemp <- speed
speed <- speed + dist
dist <- dist - xTemp

par(new=TRUE)
plot(speed,dist, xlim=c(0,121), ylim=c(0,121), col="red")