rm(list=ls())
library(gtools)
n=gtools::permutations(10,10,0:9)
cat(paste0(n[n[,1]!=0,][1e6,],collapse=''),'\n')
cat(paste0(n[n[,1]!=0,][2e6,],collapse=''),'\n')
cat(paste0(n[n[,1]!=0,][3e6,],collapse=''),'\n')

百マンコめ
3782915460

2百マンコめ
6458731092

三百マンコめ
9241687530