[R-SIG-Finance] Data

Enrico Schumann e@ @end|ng |rom enr|co@chum@nn@net
Fri Mar 19 09:59:19 CET 2021


On Fri, 19 Mar 2021, Fianu, Emmanuel Senyo writes:

> Dear All,
>
> Please, I am working on raw financial data and would  like to have the data
> cleaned. I am working on it a bit further and will be very grateful for any
> idea or support. Below are my codes and results.
> I would like to have the numbers  after the semi-columns separate.
>
>
> Strike<-unlist(c(my.data$Strike))
> #
> #
> Strike <- sapply(Strike[], trimws) # löscht überflüssige Leerzeichen
> Strike <- Strike[-1] # löscht die erste Zeile
>
>  CAP ATM Fwd: -0.49%                SWT 0.50% fwd: 0.05%
>               "CAP ATM Fwd: -0.49%"              "SWT 0.50% fwd: 0.05%"
>         CAP ATM Fwd: -0.46%                SWT 0.50% fwd: 0.08%
>               "CAP ATM Fwd: -0.46%"              "SWT 0.50% fwd: 0.08%"
>         CAP ATM Fwd: -0.40%                SWT 0.50% fwd: 0.11%
>               "CAP ATM Fwd: -0.40%"              "SWT 0.50% fwd: 0.11%"
>         CAP ATM Fwd: -0.32%                SWT 0.50% fwd: 0.14%
>               "CAP ATM Fwd: -0.32%"              "SWT 0.50% fwd: 0.14%"
>         CAP ATM Fwd: -0.23%                SWT 0.50% fwd: 0.17%
>               "CAP ATM Fwd: -0.23%"              "SWT 0.50% fwd: 0.17%"
>         CAP ATM Fwd: -0.14%                SWT 0.50% fwd: 0.20%
>               "CAP ATM Fwd: -0.14%"              "SWT 0.50% fwd: 0.20%"
>         CAP ATM Fwd: -0.05%                SWT 0.50% fwd: 0.23%
>               "CAP ATM Fwd: -0.05%"              "SWT 0.50% fwd: 0.23%"
>          CAP ATM Fwd: 0.07%                SWT 0.50% fwd: 0.25%
>                "CAP ATM Fwd: 0.07%"              "SWT 0.50% fwd: 0.25%"
>
> Many thanks
> Emmanuel
>

Please provide a reproducible example, so that people can help you.

(It's not what you have written, but did you mean "the
 numbers after the colons"? Then perhaps look at
 ?strsplit :

   strsplit("CAP ATM Fwd: -0.49%", split = ":", fixed = TRUE)
   ## [[1]]
   ## [1] "CAP ATM Fwd" " -0.49%"    

   sapply(strsplit("CAP ATM Fwd: -0.49%", ":", fixed = TRUE), `[[`, 2L)
   ## [1] " -0.49%"

)


-- 
Enrico Schumann
Lucerne, Switzerland
http://enricoschumann.net



More information about the R-SIG-Finance mailing list