choose.files is only for MS Windows (the Help file says).
-- Bert
On Wed, Dec 18, 2024 at 8:06 AM Gabor Grothendieck
<ggrothendi...@gmail.com> wrote:
>
> Try choose.files
>
> choose.files(default = file.path(mydir, "*.*"), multi = FALSE)
>
> On Wed, Dec 18, 2024 at 10:33 AM J C Nash <profjcn...@gmail.com> wrote:
> >
> > I've been working on a small personal project that needs to select files
> > for manipulation from
> > various directories and move them around in planned ways. file.choose() is
> > a nice way to select
> > files. However, I've noticed that if file.choose() is called within a
> > function, it is the
> > directory from which that calling function has been invoked that is
> > displayed by file.choose().
> >
> > This is not altered if I setwd() within that function. Have I misunderstood
> > something or is this
> > an infelicity of file.choose(). sessionInfo() gives my system as
> > R version 4.4.2 (2024-10-31)
> > Platform: x86_64-pc-linux-gnu
> > Running under: Linux Mint 22
> >
> > I've a small example script. It actually helps to create nd1 and nd2 and
> > give them some dummy
> > files before testing.
> >
> > Suggestions welcome.
> >
> > John Nash
> >
> >
> > # fcdir.R -- show directory being used by function that calls file choose
> > cpath<-getwd()
> > nd1<-paste0(cpath,"/nd1")
> > nd2<-paste0(cpath,"/nd2")
> > dir.create(nd1)
> > dir.create(nd2)
> >
> > myfc<-function(){
> > cat("myfc working in ",getwd(),"\n")
> > val<-file.choose()
> > val
> > }
> > myfcd<-function(adir){
> > setwd(adir)
> > cat("in myfcd, getwd() =", getwd(),"\n")
> > val<-file.choose()
> > val
> > }
> >
> > print(getwd())
> > one<-myfc()
> > cat("one=",one,"\n")
> > setwd("nd1")
> > print(getwd())
> > two<-myfc() # This opens file.choose() in nd1
> > cat("two=",two,"\n")
> > setwd("..")
> > print(getwd())
> > three<-myfcd("nd2") # But this does not
> > cat("three=",three,"\n")
> >
> > ______________________________________________
> > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide
> > https://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained, reproducible code.
>
>
>
> --
> Statistics & Software Consulting
> GKX Group, GKX Associates Inc.
> tel: 1-877-GKX-GROUP
> email: ggrothendieck at gmail.com
>
> ______________________________________________
> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide https://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide https://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
