upload files within nested folders in AWS S3 using R

I am looking a way where I can upload files with in a nested folder using R Programming

I tried below functions which uploads either file or folder from aws.s3 package

library("aws.s3")
put_object("pathoftheobject", object = "filename", bucket = "bucketname")    
put_folder("foldername", bucket = "bucketname")

Folder Structure and Files :

ParentFolder
  SubFolder1
         File1
         File2
  SubFoler2
         File3
         File4
  ............
  SubFoldern
          Filen

Any guidance here will be really useful.