1. I don't have a way to assess model fit. If the differences are nominal, then in my mind there's no concern.
2. To perform permutations separately for each chromosome, you could provide scan1perm() with data for a single chromosome.
operm <- vector("list", length(probs)
names(operm) <- names(probs)
for(chr in names(probs)) operm[[chr]] <- scan1perm(probs[, chr], pheno, kinship[chr], n_perm=1000)
3. By "pseudomarker" we just mean a position between markers that is considered as a putative QTL location. I don't know what sort of description you'd find useful; the idea of goes back to interval mapping introduced by Lander and Botstein (1989)
karl