r - R中分段函数的PMF和CDF
问题描述
给定
p<-function(x){if ( x==-4) {
0.1
} else if (x==-1 ) {
0.2
} else if ( x==1) {
0.6
} else if (x==2 ) {
0.1
} else {
0
}
我将如何绘制 PMF 和 CDF。没有指定分发,所以我不能使用内置命令。绘制这些的最佳方法是什么
解决方案
简单而简单的解决方案:
### support
x = seq(-4,2,1)
### PDF
plot(x,sapply(x,p),ylab="PDF")
### CDF
plot(x,cumsum(sapply(x,p)),ylab="CDF")
推荐阅读
- shell - 如何从cantos tmp文件夹中删除php会话文件
- python - Postgis ST_GeomFromWKB 返回遇到无效的字节序标志值
- postgresql - postgresql – Debian 伸展上没有 crypt 功能
- sql - 为什么布尔字段在 Hive 中不起作用?
- visual-studio-code - 如何检查内置格式化程序/美化器版本?它会自动更新吗?
- python - (Python) How to fix numerical representation error in dataframe column values
- python - cython 是否支持数据类或类似的东西
- c++ - 实现与浮点数一起使用的自定义 atomic_add()
- java - 如何在 Android 中将 RecyclerView 添加到导航?
- java - 无法使用 JSTL 在 JSP 中打印 Java List 对象