cluster_pam function

PAM (Partitioning Around Medoids)