SplitLayout | split layout with two sides | Android library

I try to create an app in Shiny and all selectInput were dynamic reactive objects but at the moment they make some plot (output$myplot) with the combination of the variables select and if(){} condition using observe({}), my plot doesn't work (PEST == unique(stands_ds$PEST) : length of larger object is not multiple of length of smaller object). The problem is with the final selection object selectedvariable4 and try to used selectedvariable4, selectedvariable4(),selectedvariable4()$ID_UNIQUE and unique(selectedvariable4()$ID_UNIQUE) without success. In my example:

I try to create an app in Shiny and all selectInput were dynamic reactive objects but at the moment they make some plot (output$myplot) with the combination of the variables select, my plot doesn't work (Error in charToDate: character string is not in a standard unambiguous format). The problem is with the final selection object selectedvariable4 and try to used selectedvariable4, selectedvariable4(),selectedvariable4()$ID_UNIQUE and unique(selectedvariable4()$ID_UNIQUE) without success. In my example:

In my shiny example below I have 3 variables (Project, Stand and ID_Unique). I would like that when I select Project, the variables Stand and ID_Unique would only be those contained in the selection made in Project in the input. Here is my detaild example:

I have an if statement condition for my plots and I need to use observe function. All the app works OK, but when I try to use the shinymanager for credentials creation, my app doesn't work anymore and the error is always: Error in if: argument has length zero

I'd like to use my currentvariable5() reactive object to create some kind of plot if == "A" ( if(currentvariable5()=="A"){}) and another if == "B" (else{}). But I try many tricks in several posts and the output is always:

I have a problem with plot contour lines using st_as_sf() in shinyapps.io. I checked all the packages' dependencies and nothing. I know that's in st_as_sf() because in my all data set, some contour plot works and don't have any geometry problem with my stands_extent file.

My plot works very well in local Shiny RStudio:

But after publish on shinyapps.io:

My example below and just only with Unique ID CERROCOROADO_003A the plot work:

I'd like to download inside Shiny a georeferenced PDF file (geoPDF) and for this a need some steps like convert the plot in ggplot format to tiff, populate the spatial coordinates, create a geo tiff, and finally my geoPDF. But several steps in downloadHandler() function in tempdir() directory results always in the error:

I'd like to make a map in shiny by column name selection (PEST, DATA_S, PROJETO, CD_TALHAO, ID_UNIQUE) but I don't know why the function subset does not respond to the reactive selection. Please any ideas?

When I try in my example:

I'm attempting to made reactive labels for my summary table. I'm making a reactive regression model and then I'm pulling that data frame out of the model and using that to make my summary table using gtsummary::tbl_summary() which outputs prettier tables than stargazer imo.

tbl_summary takes a list formatted like variable ~ "variable name". I'm using if statements to check that the variable name exists in the df and if it does, it appends it to the temporary variable covars which ultimately makes up the reactive variable covar.labels. covar.labels should ultimately have a list of formulas formatted as variable ~ "variable name" which will define the labels for my summary table if and only if they actually exist in the regression model.

Data: https://pastebin.com/kjAynKNH

I tested this first outside of Shiny and the following code works: