[R] Create a sequence

[Eric Berger]

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 <dcarlson using 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-bounces using r-project.org> On Behalf Of Marc Schwartz
> via R-help
> Sent: Tuesday, April 9, 2019 8:21 AM
> To: bienvenidozoma using gmail.com
> Cc: R-help <r-help using r-project.org>
> Subject: Re: [R] Create a sequence
>
>
>
> > On Apr 9, 2019, at 9:07 AM, bienvenidozoma using 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 using 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 using 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]]