Chinaunix首页 | 论坛 | 博客
  • 博客访问: 115012
  • 博文数量: 28
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 202
  • 用 户 组: 普通用户
  • 注册时间: 2014-05-31 21:51
个人简介

諸惡莫做,眾善奉行,自淨其意!

文章分类

全部博文(28)

文章存档

2018年(1)

2017年(3)

2015年(3)

2014年(21)

我的朋友

分类: 大数据

2014-12-20 10:32:07

R画函数图像可以用curve和plot等函数。

curve函数:

> curve(sin, -3, 3, col="red")
> curve(dnorm, -3.5, 3.5, main="Std. Normal Density", col="green")
> f <- function(x) exp(-abs(x)) * sin(2 * pi * x)
> curve(f, -5, +5, main="Dampened Sine Wave", col="blue")


plot函数

> p0<-function(x) 1/4+3/4*exp(-4*x/3)
> p1<-function(x) 1/4-1/4*exp(-4*x/3)
> plot(p0,0,3,col='red',xlab='d=3λt',ylab='transition probability')
> plot(p1,0,3,col='blue',xlab='d=3λt',ylab='transition probability',main='probability of T to C',ylim=c(0,1))


要想将两个图片合并时,可以用添加add=TRUE选项,但两个函数的x和y轴的范围必须一致
> plot(p0,0,3,col='red',xlab='d=3λt',ylab='transition probability',main='probability of T to C',ylim=c(0,1))
> plot(p1,0,3,col='blue',xlab='d=3λt',ylab='transition probability',main='probability of T to C',ylim=c(0,1),add=T)

阅读(4160) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~