setup script for arama affymetrix in R