DataSourceInfo <- setClass(
# Set the name for the class
"DataSourceInfo",
# Define the slots
slots = c(
title = "character",
accessDriver="character",
path="character",
host="character",
port="character",
user="character",
password="character",
db="character",
timeout="character",
encoding="character",
dbtype="character"
),
prototype=list(
title = "",
accessDriver="",
path="",
host="localhost",
port="5432",
user="",
password="",
db="",
timeout="4",
encoding="CP1252",
dbtype="POSTGIS"
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.