Re: Creating a list of 1x2 element arrays without procedural programming
- To: mathgroup at smc.vnet.net
- Subject: [mg132078] Re: Creating a list of 1x2 element arrays without procedural programming
- From: Bill Rowe <readnews at sbcglobal.net>
- Date: Mon, 2 Dec 2013 01:56: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
On 12/1/13 at 8:23 AM, Anthony.J.Mannucci at jpl.nasa.gov (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.}}
There are a variety of ways to get the same result such as:
Join @@ Table[{i, j}, {i, 30, 45, 5}, {j, -270, -240, 10}]
or
Join @@ Outer[List, Range[30, 45, 5], Range[-270, -240, 10]]