Using Part rather than Extract

SeedRandom@1;
myList = RandomInteger[{0, 10}, {10, 10, 10, 10}];
x = {2, 10, 3, 4};
y = Extract[myList, x]

Part[myList, Sequence @@ x]

On a smaller list:

list = {{a, b}, {c, d}};
{Extract[list, {1, 1}], Part[list, Sequence @@ {1, 1}]}

{a, a}

Knowing that, as Kuba noted, Part[list, Sequence @@ {1, 1}] is equivalent to list[[##]] & @@ {1, 1}.

Two further variations of the same theme (actually for the first one only the input syntax is different):

myList[[Sequence@@x]]
mylist[[##&@@x]]

And a different one:

Part@@Prepend[x,myList]

Try this also:

SeedRandom@1;
myList = RandomInteger[{0, 10}, {10, 10, 10, 10}];
y=myList[[Delete[x, 0]]]

y=myList[[x /. List -> Sequence]]

Related