Add Index to All Elements of a List

My goal is to add an index to all elements of a list in the form {"a", "b", "c", ... }, so it becomes {"N1 a", "N2 b", "N3 c" ... }

may be

seq={"a","b","c","d"};
MapIndexed["N"<>ToString[First@#2]<>" "<>#1&,seq]

gives

{"N1 a", "N2 b", "N3 c", "N4 d"}

list = {"a", "b", "c", "d"};

Array["N" <> ToString@# <> " " <> list[[#]] &, Length@list]

{"N1 a", "N2 b", "N3 c", "N4 d"}