Create cladeIdentity.R