tabPanel('Current Yield', value = 'tab_bond_cyield',
fluidPage(
includeCSS("mystyle.css"),
fluidRow(
column(2, offset = 2,
numericInput(
inputId = "bond_cyield_face_value",
label = "Face Value:",
value = 100
)
),
column(2,
numericInput(
inputId = "bond_cyield_price",
label = "Price:",
value = 100
)
)
),
fluidRow(
column(2, offset = 2,
numericInput(
inputId = "bond_cyield_coupon_rate",
label = "Coupon Rate:",
value = 0.10,
min = 0,
max = 1,
step = 0.01
)
)
),
br(),
br(),
fluidRow(
column(2, offset = 2,
actionButton(
inputId = "bond_cyield_submit",
label = "Submit",
width = '150px'
),
br()
),
column(2,
actionButton(
inputId = "bond_cyield_reset",
label = "Reset",
width = '150px'
),
br()
)
),
fluidRow(
column(4, offset =2, align = 'center',
br(),
br(),
verbatimTextOutput('bond_cyield_output')
)
)
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.