## Question:

I'm having a problem getting some values given by the `boot`

function in R:

My data

```
dados<- c(16483.82, 16463.06, 15649.35, 15615.27, 20034.44, 16254.43, 16946.72)
meanFunc <- function(x,i){mean(x[i])}
bootMean <-(boot(data=x,statistic=meanFunc,R=1000))
```

After that, I do `> bootMean`

and the result is as follows:

```
ORDINARY NONPARAMETRIC BOOTSTRAP
Call:
boot(data = x, statistic = meanFunc, R = 1000)
Bootstrap Statistics :
original bias std. error
t1* 16778.16 -0.9335903 540.371
```

I got part of these codes on this link

I tried converting to a data frame but it didn't work.

## Answer:

I found a possible solution here , so if anyone has the same problem, a way to solve this one.

```
bias<- mean(bootMean$t) - bootMean$t0
desviopadrao<- sd(bootMean$t)
original<-bootMean$t0
```