我有一个二进制文件,昏暗的1440*720,等于1036800像素.
我想知道:
像素总数超过0.5的像素数中有多少像素?
这是我从二进制文件中读取的代码:
conne <- file("C:fined.bin","rb")
sd<- readBin(conne, numeric(), size=4, n=1440*720, signed=TRUE)
y<-t(matrix((data=sd), ncol=1440, nrow=720))
Run Code Online (Sandbox Code Playgroud)
NaN在计算它们之前删除它们.
sum(sd[!is.nan(sd)] > 0.5)
# [1] 104601
Run Code Online (Sandbox Code Playgroud)
有关非数字值数量的信息,请使用table.
table(sd > 0.5, useNA = "always")
# FALSE TRUE <NA>
# 103341 104601 828858
Run Code Online (Sandbox Code Playgroud)
或者count从plyr包中获取数据框形式的结果.
count(sd > 0.5)
# x freq
# 1 FALSE 103341
# 2 TRUE 104601
# 3 NA 828858
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
977 次 |
| 最近记录: |