poly={"Johnson",1}

PolyhedronData[poly,"Name"]

v=PolyhedronData[poly,"Vertices"]

N[v,30]

f=PolyhedronData[poly,"Faces"]-1

{Length[v],Length[f]}