Come ottenere ogni altro elemento in una lista

Question

Ho una lista in Mathematica, e sto cercando di ottenere ogni altro numero nella lista e memorizzarlo come una nuova lista.

Attualmente ho

ReadList["file",Number] 

che legge l'intero elenco, { x1, x2, x3, x4, ... }; Voglio solo selezionare ogni altro numero e memorizzarlo in un nuovo elenco, ad es. { x1, x3, x5, ... }.

Come fare?

Answer 1

Prova:

yourlist = {a, b, c, d, e, f, g, h}; 
(* use Span: search for Span or ;; in Documentation Center *) 
everyotheritemlist = yourlist[[1 ;; -1 ;; 2]]; 
(* or use Take *) 
Take[yourlist, {1, -1, 2}] 

Entrambi danno:

{a,c,e,g}  

Answer 2

Per le attività del genere ci sono sempre decine di modi creativi per fare in Mathematica. kguler già ti ha dato le vie canoniche, ma eccone un altro:

Partition[yourlist, 2]\[Transpose][[1]] 

(* 
==> {a, c, e, g} 
*) 

A proposito: C'è un sito dedicato Mathematica StackExchange a https://mathematica.stackexchange.com/. La comunità di Mathematica è sempre più in movimento in quella direzione, quindi potresti voler unirti a noi anche lì.

Answer 3

Un altro modo:

First /@ ReadList["test.dat", {Number, Number}]