Cómo usar Flatten para un elemento específico de una lista
Digamos que tengo una lista {{1, 2, 3}, {4, 5}, ...}
. Quiero que la lista se vea así {1, 2, 3, {4, 5}, ...}
. Lo estoy haciendo de esta manera:
list = {{1, 2, 3}, {4, 5}};
list2 = Flatten[list[[1]], 1];
list3 = Append[list2, list[[2]]]
Esto me está dando un resultado correcto. ¿Pero hay alguna manera fácil de hacer esto?
Respuestas
10 kglr
Para acoplar la primera lista en una lista de listas:
Append @@ list
{1, 2, 3, {4, 5}}
{##& @@ #,##2}& @@ list
{1, 2, 3, {4, 5}}
En general, además de lo FlattenAt[list, 1]
sugerido por Rohit en los comentarios, puede usar
MapAt[Splice, list, {1}] (* in versions 12.1+ *)
MapAt[Apply[Sequence], list, {1}]
MapAt[Sequence&, list, {1, 0}]
ReplacePart[list, {1, 0} -> Sequence]
l = list; l[[1]] = Splice[l[[1]]]; l
l = list; l[[1,0]] = Sequence; l