I've got a problem when creating a plot with ggplot2

```
> setwd("c:/tesis/emisiones")

```

`e<-read.csv("fh3pco1.csv",header=T)`
`attach(e)`

```
names(e)

```

[1](http://i.stack.imgur.com/xJDHR.png) "VehCat" "Component" "TrafficSit" "Subsegment" "SizeClasse" "V" "EFA"  

 [8] "norma" "cat" "cat1" 

```
library(ggplot2)

length(e)

```

[1](http://i.stack.imgur.com/xJDHR.png) 10

```
vpge0 <- function(x) {(281* x^-0.63)}

```

No Errors in Plot
=================

```
ggplot(e, aes(x=V,y=EFA, colour=norma)) +  geom_point(size=4)

```

Errors in Plot
==============

```
ggplot(e, aes(x=V,y=EFA, colour=norma)) +
  geom_point(size=4)+
  stat_function(data = data.frame(x = 1:100, FE = factor(1)),fun = vpge0, size=1)

```