A column with Records and Lists

[WillY_OneEyed]

Hi Folks,

I'm trying append all LIST register.

The code is here:

let
    Paginas = (Page) =>
    let Source = Json.Document(
        Web.Contents("http://api.worldbank.org", [Headers = [#"Content-Type" = "application/jason"], RelativePath = "/v2/country?format=json&page=" & Number.ToText(Page)]
        )
    )
    in
        Source,
        lPaginas = List.Generate(
            () => 0,
            each _ <= 6, 
            each _ + 1,
            each Paginas(Value.Add(1,_))
        ),
    #"Converted to Table" = Table.FromList(lPaginas, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Expanded Column1" = Table.ExpandListColumn(#"Converted to Table", "Column1")
in
    #"Expanded Column1"

Anyone can help me?

TY!!!

[ThxAlot · Accepted solution]

Make it simple,

let
    Source = List.Accumulate(
        {1..6},
        {},
        (s,c) => s & Json.Document(Web.Contents("http://api.worldbank.org/v2/country?format=json&page=" & Number.ToText(c))){1}
    ),
    #"Table From Records" = Table.FromRecords(Source)
in
    #"Table From Records"

[AlienSx]

Hi, @WillY_OneEyed if you want to select lists only and combine them then 

List.Combine(Table.SelectRows(#"Expanded Column1", (x) => x[Column1] is list)[Column1])