我想删除我附上的表中的以下参数:.
表格已使用代码生成。
library(questionr)
library(data.table)
library(magrittr)
CrearSecuenciaAleatoria <- function(n) {
sample(1:5, n, replace = T, prob = c(0.2, 0.3, 0.2, 0.15, 0.15))
}
CrearTablaFrecuencia <- function(v){
data.table(
xi = unique(sort(v)),
ni = as.numeric(table(v)),
fi = as.numeric(prop.table(table(v))),
Ni = cumsum(as.numeric(table(v))),
Fi = cumsum(as.numeric(prop.table(table(v))))
)
}
v <- CrearSecuenciaAleatoria(20)
dt <- CrearTablaFrecuencia(v)
print(dt, row.names = F)
您有一个 data.table,并且 data.table v1.15.0 默认在
print
方法中启用了此功能。请参阅help("print.data.table")
中的文档。
library(data.table)
dt <- data.table(x = 1:5, y = 11:15)
dt
# x y
# <int> <int>
#1: 1 11
#2: 2 12
#3: 3 13
#4: 4 14
#5: 5 15
print(dt, class = FALSE, row.names = FALSE)
# x y
# 1 11
# 2 12
# 3 13
# 4 14
# 5 15