Many thanks. The "still untested" worked.
Cheers Ed On Fri, Aug 19, 2011 at 11:23 AM, David Winsemius <dwinsem...@comcast.net>wrote: > > On Aug 19, 2011, at 10:21 AM, David Winsemius wrote: > > >> On Aug 19, 2011, at 9:45 AM, Eduardo Mendes wrote: >> >> Hello >>> >>> Many thanks. >>> >>> * is not a typo. The output is a description of a nonlinear system so >>> terms such as y(k-1)*y(k-2) are allowed. I wonder whether "" could be >>> ignored so that the outputs such as y_{01}(k-003)* would not show up. >>> >>> Paste with "*" then remove trailing "*"'s: >> >> ifelse( grepl("*$", result), sub("*","", result), result) >> > > Rather (but still untested) > > > ifelse( grepl("\\*$", result), sub("\\*","", result), result) > > -- > david. > >> >> Cheers >>> >>> Ed >>> >>> >>> On Thu, Aug 18, 2011 at 3:40 PM, David Winsemius <dwinsem...@comcast.net> >>> wrote: >>> >>> On Aug 18, 2011, at 2:35 PM, Eduardo Mendes wrote: >>> >>> Dear R-Users >>> >>> I have the following matrix >>> >>> out$desc [,1] [,2] >>> [1,] "" "" >>> [2,] "y_{01}(k-001)" "" >>> [3,] "y_{01}(k-002)" "" >>> [4,] "y_{01}(k-003)" "" >>> [5,] "u_{01}(k-001)" "" >>> [6,] "u_{01}(k-002)" "" >>> [7,] "u_{01}(k-003)" "" >>> [8,] "y_{01}(k-001)" "y_{01}(k-001)" >>> [9,] "y_{01}(k-001)" "y_{01}(k-002)" >>> [10,] "y_{01}(k-001)" "y_{01}(k-003)" >>> [11,] "y_{01}(k-001)" "u_{01}(k-001)" >>> >>> >>> and need to concatenate each line to a single string. Something like >>> >>> [2,] "y_{01}(k-001)" "" -> [2,] "y_{01}(k-001)" >>> >>> [11,] "y_{01}(k-001)" "u_{01}(k-001)" -> [11,] >>> "y_{01}(k-001)*u_{01}(k-001)" >>> >>> Is there a way to do it without going through every column? >>> >>> apply(out$desc, 1, paste, collapse="") >>> >>> It is ambiguous what you want for a delimiter. In one case you used "", >>> and another you used "*". I used "". >>> >>> >>> -- >>> >>> David Winsemius, MD >>> West Hartford, CT >>> >>> >>> >> David Winsemius, MD >> West Hartford, CT >> >> ______________________________**________________ >> R-help@r-project.org mailing list >> https://stat.ethz.ch/mailman/**listinfo/r-help<https://stat.ethz.ch/mailman/listinfo/r-help> >> PLEASE do read the posting guide http://www.R-project.org/** >> posting-guide.html <http://www.R-project.org/posting-guide.html> >> and provide commented, minimal, self-contained, reproducible code. >> > > David Winsemius, MD > West Hartford, CT > > [[alternative HTML version deleted]] ______________________________________________ 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.