为什么table函数找到一个被删除的变量？
Dog <- c("Rover", "Spot")
Cat <- c("Scratch", "Fluffy")
Pets <- data.frame(Dog, Cat) #create a data frame with two variables
names(Pets)
# [1] "Dog" "Cat"
#rename Dog to a longer name
names(Pets)[names(Pets)=="Dog"] <- "Dog_as_very_long_name"
Pets$Dog <- NULL # delete Dog
names(Pets)
#[1] "Dog_as_very_long_name" "Cat" #the variable dog is not in the data set anymore
table(Pets$Dog) #Why does the table function on a variable that was deleted
# Rover Spot
# 1 1
我正在跟踪https://drsimonj.svbtle.com/plot-some-variables-against-many-others中的最后一组代码，并修改了我的数据的代码。
在此代码中：
t3 %>%
gather(-Border, key = "var", value = "value") %>%
ggplot(aes(x = value, y = Border)) +
geom_point() +
stat_smooth() +
facet_wrap(~ var, scales = "free") +
theme_bw()
我收到此错误消息：计算失败stat_smooth()：x 没有足够的唯一值来支持 10 节：减少 k。
该代码无需 stat_smooth() 命令即可运行，但我需要平滑的线条。
除了一个具有 20 个值的 var 之外，其他所有 var 都有 5 到 6 个唯一值。如何减少 k？ak为5合理吗？样本量为 1,000。
谢谢
在R中,如果我写:
reg1 <- lm(y ~ x, data = ds)
回归模型信息存储在具有列表结构的reg1中.
我可以写:
value.of.intercept <- reg1$coefficients[1]
将截距值保存到名为"value.of.intercept"的变量中
我写什么来将截距的统计显着性值保存到变量"p.value.of.intercept"？
我可以在摘要中看到值.如果我写:
summary(reg1)
拦截的统计显着性值立即在本文下: Pr(>|t|)