And just for fun, yet another way > cumsum((1:200)*c(1,-1))
On Tue, Apr 9, 2019 at 9:51 PM David L Carlson <dcarl...@tamu.edu> wrote: > Here's another approach: > > > x <- c(rbind(1:100, -(1:100))) > > head(x); tail(x) > [1] 1 -1 2 -2 3 -3 > [1] 98 -98 99 -99 100 -100 > > ---------------------------------------- > David L Carlson > Department of Anthropology > Texas A&M University > College Station, TX 77843-4352 > > -----Original Message----- > From: R-help <r-help-boun...@r-project.org> On Behalf Of Marc Schwartz > via R-help > Sent: Tuesday, April 9, 2019 8:21 AM > To: bienvenidoz...@gmail.com > Cc: R-help <r-help@r-project.org> > Subject: Re: [R] Create a sequence > > > > > On Apr 9, 2019, at 9:07 AM, bienvenidoz...@gmail.com wrote: > > > > how to create > > u = (1, −1, 2, −2, . . . , 100, −100) in r > > > > Thanks > > Bienvenue > > Hi, > > See ?seq and ?rep > > > rep(seq(100), each = 2) * c(1, -1) > [1] 1 -1 2 -2 3 -3 4 -4 5 -5 6 -6 7 > [14] -7 8 -8 9 -9 10 -10 11 -11 12 -12 13 -13 > [27] 14 -14 15 -15 16 -16 17 -17 18 -18 19 -19 20 > [40] -20 21 -21 22 -22 23 -23 24 -24 25 -25 26 -26 > [53] 27 -27 28 -28 29 -29 30 -30 31 -31 32 -32 33 > [66] -33 34 -34 35 -35 36 -36 37 -37 38 -38 39 -39 > [79] 40 -40 41 -41 42 -42 43 -43 44 -44 45 -45 46 > [92] -46 47 -47 48 -48 49 -49 50 -50 51 -51 52 -52 > [105] 53 -53 54 -54 55 -55 56 -56 57 -57 58 -58 59 > [118] -59 60 -60 61 -61 62 -62 63 -63 64 -64 65 -65 > [131] 66 -66 67 -67 68 -68 69 -69 70 -70 71 -71 72 > [144] -72 73 -73 74 -74 75 -75 76 -76 77 -77 78 -78 > [157] 79 -79 80 -80 81 -81 82 -82 83 -83 84 -84 85 > [170] -85 86 -86 87 -87 88 -88 89 -89 90 -90 91 -91 > [183] 92 -92 93 -93 94 -94 95 -95 96 -96 97 -97 98 > [196] -98 99 -99 100 -100 > > > Regards, > > Marc Schwartz > > ______________________________________________ > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > 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 -- To UNSUBSCRIBE and more, see > 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. > [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.
