Re: Creating a list of 1x2 element arrays without procedural programming
- To: mathgroup at smc.vnet.net
- Subject: [mg132087] Re: Creating a list of 1x2 element arrays without procedural programming
- From: "Nasser M. Abbasi" <nma at 12000.org>
- Date: Mon, 2 Dec 2013 01:59:42 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-outx@smc.vnet.net
- Delivered-to: mathgroup-newsendx@smc.vnet.net
- References: <l7fckt$k44$1@smc.vnet.net>
- Reply-to: nma at 12000.org
On 12/1/2013 7:13 AM, amannucci wrote:
> Is there a way in Mathematica using built-in functions to create what the following
>procedural program does?
>
> latlong = {}
> Do[AppendTo[latlong, {i, j}] , {i, 30.0, 45.0,
> 5.0}, {j, -270.0, -240.0, 10.0}];
> latlong
>
> Out:
> {{30., -270.}, {30., -260.}, {30., -250.}, {30., -240.}, {35., \
> -270.}, {35., -260.}, {35., -250.}, {35., -240.}, {40., -270.}, {40., \
> -260.}, {40., -250.}, {40., -240.}, {45., -270.}, {45., -260.}, {45., \
> -250.}, {45., -240.}}
>
> Thanks!
>
> -Tony
>
many ways. One way
lst1 = Range[30.0, 45.0, 5.0];
lst2 = Range[-270.0, -240.0, 10.0];
Flatten[Map[ Thread[{#, lst2}] &, lst1], 1];
--Nasser