Линия, которую вы пытаетесь построить, находится за пределами окна печати. Вы можете убедиться в этом, рассчитав значение y для значений x на границах своего графика:
# What value on the y-axis does the line have when x = 160?
> 129.2058 + 0.7146 * 160
[1] 243.5418
# What value on the y-axis does the line have when x = 200?
> 129.2058 + 0.7146 * 200
[1] 272.1258
Причина этого в том, что вы наносите рост и вес на противоположных осях относительно того, что вы ввели в вашу линейную модель.
Попробуйте вместо:
l1 <- lm(Height ~ Weight, data=medalswimmers)
plot(medalswimmers$Weight, medalswimmers$Height, cex=1.3, pch=16,
ylab="Height of medal winning swimmers (in years)",
xlab="Respective weight of medal winning swimmers (in cm)")
abline(a=coef(l1)["(Intercept)"], b=coef(l1)["Weight"], color="blue")
Вы можете использовать cURLpp
Я еще не использовал его, но example20 похоже, это может решить вашу проблему.
Вы можете использовать классы WinInet или WinHTTP в C ++. Это родные интерфейсы Win32 API, представляющие собой абстрактную часть работы по отправке и получению файлов из Интернета.
Я с большим успехом использовал WinInet, чтобы делать то, что вы пытаетесь.
Если запуск нового процесса в порядке, вы можете взглянуть на WGET . (И даже если нет, источники доступны; вы можете посмотреть там, как это реализовано.)