But sprintf is itself vectorized. If you give it vectors, it returns vectors.
So you could obtain that apply-result more efficiently by passing a bunch of
column vectors of data. There happens to be a convenient object called a data
frame that holds a bunch of similar-length vectors.
DF <- data.frame( m=c(1,2), b=c(-3,4) )
result <- sprintf( "y=(%d)*x+(%d)", DF$m, DF$b)
cat(paste(result, collapse="\n"))
---------------------------------------------------------------------------
Jeff Newmiller The ..... ..... Go Live...
DCN:<jdnew...@dcn.davis.ca.us> Basics: ##.#. ##.#. Live Go...
Live: OO#.. Dead: OO#.. Playing
Research Engineer (Solar/Batteries O.O#. #.O#. with
/Software/Embedded Controllers) .OO#. .OO#. rocks...1k
---------------------------------------------------------------------------
Sent from my phone. Please excuse my brevity.
S Ellison <s.elli...@lgcgroup.com> wrote:
>
>
>> How to make R write out:
>>
>> Balance = 2 + 3 * IntGDP + 5 * IntUnemployment + 0.3 * d1
>>
>> from the table below:
>>
>> Balance Intercept IntGDP GDPNum IntUnemployment
>> IntInflation d1 d2 d3
>> 30000 2 3 5
>> 0.3 0 0
>
>
>Maybe ?sprintf would help?
>
>And if you wrap that in a function that takes a vector, using apply()
>on the table would give you one string per row,
>
>*******************************************************************
>This email and any attachments are confidential. Any
>use...{{dropped:8}}
>
>______________________________________________
>R-help@r-project.org mailing list
>https://stat.ethz.ch/mailman/listinfo/r-help
>PLEASE do read the posting guide
>http://www.R-project.org/posting-guide.html
>and provide commented, minimal, self-contained, reproducible code.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
