gistfile1.txt

#  Make S3 bucket the default storage location for project you set up.  Lets assume that this project has Id syn123
#In R run:  

library(synapseClient)
synapseLogin()

# Set up a storage location for this bucket in Synapse. Only need to do this once per bucket.
AWSbucketName = "your-bucket-name-here"

storageLocation <- synRestPOST("/storageLocation", list(
  concreteType="org.sagebionetworks.repo.model.project.ExternalS3StorageLocationSetting",
  uploadType="S3",
  bucket=AWSbucketName,
  baseKey=""))

##Add this as the default storage location for the new project at syn123
synRestPOST('/projectSettings', list(
  "concreteType": "org.sagebionetworks.repo.model.project.UploadDestinationListSetting",
  "settingsType": "upload",
  "projectId": "syn123", 
  "locations" = [storageLocationt['storageLocationId']])