问题描述
因此，我的最终目标是能够拥有一个可以在VMware工作站中启动的模板VM，并使用cidata iso对其进行自定义，我指定了上面的配置（主机名，IP，要安装的软件包）等）。
我似乎做不到：）
到目前为止，我的过程是安装ubuntu服务器VM进行首次引导。然后，我运行max_plots <- 12
library(shiny)
# Define UI for application that draws a histogram
ui <- fluidPage(
headerPanel("Dynamic number of plots"),sidebarPanel(
sliderInput("n","Number of plots",value=1,min=1,max=5)
),mainPanel(
# This is the dynamic UI for the plots
uIoUtput("plots")
)
)
# Define server logic required to draw a histogram
server <- function(input,output) {
# Insert the right number of plot output objects into the web page
output$plots <- renderUI({
plot_output_list <- lapply(1:input$n,function(i) {
plotname <- paste("plot",i,sep="")
plotOutput(plotname,height = 280,width = 250)
})
# Convert the list to a tagList - this is necessary for the list of items
# to display properly.
do.call(tagList,plot_output_list)
})
# Call renderPlot for each one. Plots are only actually generated when they
# are visible on the web page.
for (i in 1:max_plots) {
# Need local so that each item gets its own number. Without it,the value
# of i in the renderPlot() will be the same across all instances,because
# of when the expression is evaluated.
local({
my_i <- i
plotname <- paste("plot",my_i,sep="")
output[[plotname]] <- renderPlot({
plot(1:my_i,1:my_i,xlim = c(1,max_plots),ylim = c(1,main = paste("1:",". n is ",input$n,sep = "")
)
})
})
}
}
# Run the application
shinyApp(ui = ui,server = server)
并重新启动，但是未应用该配置。在尝试的日子里，我已经尝试了很多事情。 sudo cloud-init clean，选择openstack打开。正在执行：
dpkg-reconfigure cloud-init重新启动之前。
我已经查看了日志，但是它没有给出任何信息为什么不被提取！
是否应该以这种方式使用cloud-init？我想我只是在某个地方缺少东西
TIA！
解决方法
暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！
如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@）