Suppose I have the following text:

```
"    7.7597     4.7389     3.0058     0.0013"

```

I know it's format:

```
" %9.4f  %9.4f  %9.4f  %9.4f"

```

I want to extract variables out of it. I want something like `sprintf`/`gettextf` function but does does the reverse:

```
??????(" %9.4f  %9.4f  %9.4f  %9.4f", v1, v2, v3, v4)

```

How can I do that? (without loading any packages, if possible) 

The unreliable method I use right now is:

```
temp <- as.numeric(unlist(strsplit("    7.7597     4.7389     3.0058     0.0013"," ")))
temp[!is.na(temp)]

```