shinyjs | 💡 Easily improve the user experience | Data Visualization library

I have read this article on tagQuery and was left wondering what could be the practical use in a shiny app.

Is it to modify a tag on the server side in a way similar to shinyjs::addClass()?

My application server file looks like this :

I need some clarification on how to properly send queries to my database within RShiny...

I have build-up an application in which anyone can create an account and then write some informations in a dataframe before saving those rows to my database.

The app works perfectly well when testing my it with a single user but shows some issues when several users send data to my database at the same time. All the informations sends are duplicated 2 to 10 times in postgresql...

For instance if I add an unique observation of 5 individuals of species "A" with an observation date on the 25th of february I will get 3 rows (sometimes it can be up to 10 duplicates) in my database instead of one. (like shown in the table below):

In the below reproducible code, two main conditional panels are presented: "Stratification" and "DnL balances". The first presents a smaller data table where no scroll bars are automatically introduced, and the 2nd presents a larger data table where scroll bars are introduced.

The scroll bars in one conditional panel appear to be affecting the other conditional panel. I have tried addressing with style = "display: none;" (based on a related post yesterday), flagged with ### in this reproducible code, but it leaves the 2nd conditional panel without the glide/well panel across the top unless the user adjusts the size of the window, however minutely. Yesterday's posted solution worked fine, but that code didn't render a data table. When introducing a data table and resulting scroll bars, the issue manifests.

Is there a way to resolve this? May be a hack, but even a tiny automated adjustment to the size of the window may help?

The images at the bottom better explain the issue.

I make making a Shiny app in R that shows the user an Excel-like grid. The excelR package is a wrapper for a JS package JSpreadsheet. This package automatically puts row numbers in the left-most column. I do not want them.

By digging into the JavaScript, I was finally able to figure out how to use an actionButton to remove the row numbers by sending a JS command:

I created several two inputs in the UI: "slider0" and "slider1" and one in the server using renderUI "slider2". I am trying to use calculate a new column of a data-frame based on a conditional statement on slider0 and the values of slider1 and slider2.

I have the following reproducible code:

I'm having trouble with the formats of conditional panels affecting other conditional panels. Below is reproducible code, and at the bottom are images better explaining the issue. In the fuller App this code derives from, the problem is more obvious and makes it look sloppy (in the fuller App, there are multiple screens the user clicks through as the user scrolls to the right along the shaded bar (Well Panel) at the top just underneath the tab label, and the misalignment gets more pronounced as the user scrolls to the right).

The problem is: as the user scrolls right through the Glide Controls / Well Panels to make selections, the Well Panels (at the top with radio buttons) begin to misalign with the table and/or plots that appear beneath. The misalignment gets more pronounced as the user scrolls right. This misalignment isn't as apparent in this reproducible example, but is more pronounced in the fuller App this derives from where there are multiple "screens" or Well Panels at the top for the user to scroll through and where there are data tables and/or plots presented underneath in the main panel.

For sake of simplicity all server code is eliminated in this example (no plots, no tables), as the issue still presents without the server code.

If I comment-out other conditional panels (marked "###" in the reproducible code) the misalignment goes away. So how can I make the conditional panels independent of one another, as a way of eliminating this misalignment? I'm open to any other suggestions for eliminating this misalignment.

The basic structure of the App is the user makes "big choices" along the sidebar panel, and makes more "refined choices" only the top bar underneath the tab label using Glide Controls/Well Panels etc. for a carousel affect.

Reproducible code:

This is follows up on my June 30 post where I eliminated conditionalPanel flashing in the sidebarPanel when invoking the App. The solution was to move those sidebar conditional panels into renderUI, eliminating flashing. However, I later found out that using renderUI in this manner results in other limitations. Is there any way to eliminate invocation flashing without using renderUI?

I include below 3 sets of code:

1. Very short MWE code that illustrates the flashing issue, contributed by ismirsehregal
2. Long, convoluted code that very clearly illustrates how all conditional panels flash by in sidepanel upon invocation, when sidebar conditional panels are rendered in UI (there is no renderUI for conditional panels in the sidebar panels like in #3 below which resolves this although it introduces other problems not explained in this post).
3. Adaptation of #2 above where renderUI is used and there is no invocation flashing.

I didn't want to completely strip down the code in items 2 and 3, so that the sidebar panels are large enough which makes the invocation flashing more obvious. Also I when I did some stripping down of this code I did lose some functionality like "Reset", which isn't relevant to the problem at hand in any case.

Though the code in #2 and #3 may be torturously long and involved, the moving of the conditional panel into renderUI is straightforward.

No. 1 short MWE code:

I want to be able to update the selection available in the pickerInput based upon the selection made in the radio button input. In the example below, I want the radio button "A", to give a pickerInput list of mtcars$cyl, whilst a picker input of "B" to give a picker input of mtcars$mpg

I have tried doing this using if statements, but I haven't got anywhere so far. Reproducible example below: