Поскольку это позволяет избежать этого:
class A {
public:
A(int) {}
};
class B0: virtual public A {
public:
B0(): A(0) {}
};
class B1: virtual public A {
public:
B1(): A(1) {}
};
class C: public B0, public B1 {
public:
C() {} // How is A constructed? A(0) from B0 or A(1) from B1?
};
Вы не можете получить доступ к входам в части приложения ui.R, поэтому вам нужно использовать renderUi / uiOutput для динамического создания вашего selectInput.
В вашем ui.R
вы можете добавить:
uiOutput("secondSelection")
и в вашем server.R
:
output$secondSelection <- renderUI({
selectInput("User", "Date:", choices = as.character(dat5[dat5$email==input$Select,"date"]))
})