Primera version del archivo uni_bases.R