Re: How to make {f,g}[a,b,c] to become {{f[a],g[a]},{f[b],g[b]},{f[c],g[c]}}

*To*: mathgroup at smc.vnet.net*Subject*: [mg105319] Re: How to make {f,g}[a,b,c] to become {{f[a],g[a]},{f[b],g[b]},{f[c],g[c]}}*From*: "Chris Degnen" <degnen at cwgsy.net>*Date*: Sat, 28 Nov 2009 01:04:40 -0500 (EST)*References*: <heoe15$4ph$1@smc.vnet.net>

TableForm[ DeleteCases[{CountryData[#, "Name"], CountryData[#, "GDP"], CountryData[#, "Population"]} & /@ CountryData[], {_, Missing["NotAvailable"], _}]] >I have a question. How to make {f,g}[a,b,c] to become {{f[a],g[a]},{f > [b],g[b]},{f[c],g[c]}}? > > I want to do {GPD, Population} for all countries. > > Something similar to the following... > {CountryData[#, "GDP"] &, CountryData[#, "Population"] &} /@ > CountryData[] > > It ends up in the form of {f,g}[a,b,c,d,...]. I need a way to > 'distribute' the country name into the GDP and Population portion. > > Thanks. >