Hola Lorena,

Yo creo que tu problema está en los datos. ¿Cómo los importas a R? Si los
guardas como .csv (recuerda separar por ";" ya que tu punto decimal es la
",") el siguiente código funciona:

> data <- read.csv2("lorena.csv")> modeloM <- lm (AVE ~ d1 + as.factor(d1T)*Tariff, data = data)> summary(modeloM)
Call:
lm(formula = AVE ~ d1 + as.factor(d1T) * Tariff, data = data)

Residuals:
    Min      1Q  Median      3Q     Max
-0.4165 -0.4108 -0.3148  0.3892  1.8855

Coefficients: (6 not defined because of singularities)
                             Estimate Std. Error t value Pr(>|t|)
(Intercept)                  0.409368   0.039462  10.374   <2e-16 ***
d1                          -0.415491   0.392979  -1.057    0.291
as.factor(d1T)0.2            0.855461   0.555154   1.541    0.124
as.factor(d1T)0.8426         0.803343   0.675695   1.189    0.235
as.factor(d1T)1.25           0.001986   0.503250   0.004    0.997
as.factor(d1T)1.5            1.101158   0.674452   1.633    0.103
as.factor(d1T)1.85                 NA         NA      NA       NA
Tariff                       0.003310   0.043248   0.077    0.939
as.factor(d1T)0.2:Tariff           NA         NA      NA       NA
as.factor(d1T)0.8426:Tariff        NA         NA      NA       NA
as.factor(d1T)1.25:Tariff          NA         NA      NA       NA
as.factor(d1T)1.5:Tariff           NA         NA      NA       NA
as.factor(d1T)1.85:Tariff          NA         NA      NA       NA
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Residual standard error: 0.5505 on 553 degrees of freedom
  (190 observations deleted due to missingness)
Multiple R-squared:  0.01096,	Adjusted R-squared:  0.0002324
F-statistic: 1.022 on 6 and 553 DF,  p-value: 0.4101



*####################################################################*



Si necesitas automatizar la lectura del .xlsx puedes usar el paquete
XLConnect, pero tendrás que definir bien la importación porque la
importación "por defecto" no importa los datos bien debido al formato y/o
contenido de las celdas.

Un saludo,

*_____________________________________*
*Emilio López Cano*
+34 665 676 225
http://es.linkedin.com/in/emilopezcano
www.proyectum.es



2014-01-12 13:59 GMT+01:00 Lorena Tudela Marco <lorenatudelamarco@gmail.com>
:

> Disculpar! adjunto los datos con los que ando trabajando!
>
> Muchas gracias de nuevo,
>
> Lorena
>
>
>
> El 12 de enero de 2014, 13:53, Lorena Tudela Marco <
> lorenatudelamarco@gmail.com> escribió:
>
>> Buenos días,
>>
>> Me gustaría aplicar una regresión múltiple a los datos con los que
>> trabajo pero no se como introducir los datos en R.  He
>> probado introducir el siguiente comando:
>>
>> modeloM<-lm(AVE.~ d1 + as.factor(d1T)*Tariff)
>> summary(modeloM)
>>
>> Pero me da el siguiente error:
>>
>> > summary(modeloM)
>> Error in if (attr(z$terms, "intercept")) sum((f - mean(f))^2) else
>> sum(f^2) :
>>   argument is of length zero
>>
>> Mi intención es calcular la siguiente regresión: Ave = cte +
>> d1*coeficiente1 + (d1T*Tariff)*coeficiente 2
>> Siendo: AVE, la variable dependiente y Tarrif, la variable independiente.
>>
>> Imagino que no estoy introduciendo correctamente el comando inicial del
>> modelo y por eso me da error ¿Alguien esta trabajando en temas similares
>> o podría orientarme ?
>>
>> Muchas gracias, cualquier aportación sera bienvenida!
>>
>> Un abrazo, que tengáis un buen día.
>>
>> Lorena
>>
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>

	[[alternative HTML version deleted]]

