There is no sure fire way unless you breed a ton at once. I'm talkin hundred. It's completely at random. It was rumored, in platinum, that honey would up the rate, but like i said, it was just a rumor, and i doubt it works in HeartGold/SoulSilver. It's just one of those luck of the draws. Good luck!