Не получается линейный регрессионный график

Question

Я пытаюсь построить линейную регрессию между двумя параметрами из моего набора данных. Но я не в состоянии сделать это, я получаю сообщение об ошибке

Ошибки в plot.default (YH, г, xlab = l.fit, ylab = "Остаточный", главный = основном: формальный аргумент "xlab" соответствует несколько фактических аргументов

Вот мой код

file <- "bank.csv" 
data <- read.csv(file, header=TRUE, sep=";") 
data <- data[(data$Previous_Outcome == "success") | (data$Previous_Outcome == "nonexistent"),] 
data <- data[(data$Duration != "0"),] 
age = data$Age 
duration <- data$Duration 
fit <- lm(age ~ duration) 
png(filename = "AgevsDurationRegression.png", width=480, height=480, units="px") 
> plot(fit, main="Age vs Call Duration Regression", xlab = "Duration in Seconds", ylab = "Age in Years") 
Error in plot.default(yh, r, xlab = l.fit, ylab = "Residuals", main = main, : 
    formal argument "xlab" matched by multiple actual arguments 

уло (данные) и резюме (подходит) дала мне этот

summary(fit) 

Call: 
lm(formula = age ~ duration) 

Residuals: 
    Min  1Q Median  3Q  Max 
-23.063 -8.045 -2.027 6.956 58.007 

Coefficients: 
       Estimate Std. Error t value Pr(>|t|)  
(Intercept) 40.0792439 0.0752589 532.551 <2e-16 *** 
duration -0.0001804 0.0002040 -0.884 0.377  
--- 
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 

Residual standard error: 10.28 on 36930 degrees of freedom 
Multiple R-squared: 2.117e-05, Adjusted R-squared: -5.903e-06 
F-statistic: 0.782 on 1 and 36930 DF, p-value: 0.3765 

Answer 1

Это работало

file <- "bank.csv" 
data <- read.csv(file, header=TRUE, sep=";") 
data <- data[(data$Previous_Outcome == "success") | (data$Previous_Outcome == "nonexistent"),] 
data <- data[(data$Duration != "0"),] 
age = data$Age 
duration <- data$Duration 
png("file1.png") 
plot(duration~age) 
abline(lm(duration~age)) 
dev.off() 

Answer 2

Разница между сюжетом (у ~ х) и земельный участок (лм (у ~ х)):

участок (у ~ х) дает график рассеяния переменных y Vs x. и abline (lm (y ~ x)) добавляет линию регрессии к графику.

plot (lm (y ~ x)) предоставляет регрессионные диагностические графики для модели регрессии. Он производит шесть диагностических графиков для данной модели регрессии.

• Остаточных противы подогнанных значений
• SQRT (остатки) против подогнанных значений
• Нормального QQ участка
• расстояние Кука против ряда этикетки
• оста против рычагов
• расстояния Кука против рычага/(1 -leverage).

По умолчанию предусмотрены первые три и пять.

Нажмите, чтобы увидеть эти участки по одному. Чтобы просмотреть все четыре графика в одном окне, используйте следующую команду. Он делит участок участка на сетку 2 * 2.

par(mfrow=c(2,2)) 

Чтобы сохранить любой сюжет в формате PNG:

png(file="myplot", width=400, height=350) 
    dev.off() 

Similary, вы можете использовать

bmp(file="myplot", width=400, height=350); 
    jpeg(file="myplot", width=400, height=350) or 
    tiff(file="myplot", width=400, height=350) 

функции сохранения любой сюжет в других форматах.