Strange plot on a simple dataframe Rstudio
Update:
It was only a matter of transform string numbers in numerical numbers.
I did it by transforming each &quot;non numeric&quot; column in character and used the as.numeric().
The code looks like this now:
    #Nomes das colunas
names(df)[2] = 'Produçãox1'
names(df)[3] = 'Produçãox2'
names(df)[4] = 'Remuneraçãoy1'
names(df)[5] = 'Remuneraçãoy2'

df$Produçãox1 &lt;- as.numeric(as.character(df$Produçãox1))
df$Produçãox2 &lt;- as.numeric(as.character(df$Produçãox2))
df$Remuneraçãoy1 &lt;- as.numeric(as.character(df$Remuneraçãoy1))
df$Remuneraçãoy2 &lt;- as.numeric(as.character(df$Remuneraçãoy2))

#Regressão
reg1 &lt;- lm(df$Remuneraçãoy1 ~ df$Produçãox1)
reg2 &lt;- lm(df$Remuneraçãoy2 ~ df$Produçãox2)

#Plot
plot(df$Remuneraçãoy1 ~ df$Produçãox1,xlab='Produção do setor empresarial',
     ylab='Remuneração real')
abline(reg1, col='blue')

plot(df$Remuneraçãoy2 ~ df$Produçãox2,xlab='Produção do setor empresarial não agrícola',
     ylab='Remuneração real')
abline(reg2, col='red')