# NOT RUN {
connectionDetails <- DatabaseConnector::createConnectionDetails(dbms="sql server", server="myserver")
conceptHierarchy <- conceptHierarchy(connectionDetails, resultsDatabaseSchema="scratch", vocabDatabaseSchema="vocabulary")
# }
Run the code above in your browser using DataLab