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