====== Procedura 4ft-Miner a package arules v R ======