1.) If I have a data.frame df <- data.frame(a = c(1, 2, 3), b = c(4, 5, 6), c(7, 8, 9))...
1a.) How do I select the c(4, 5, 6)?
1b.) How do I select the 1?
1c.) How do I select the 5?
1d.) What is df[, 3]?
| ### | |
| ### | |
| ### UPDATE: For Win 11, I recommend using this tool in place of this script: | |
| ### https://christitus.com/windows-tool/ | |
| ### https://github.com/ChrisTitusTech/winutil | |
| ### https://www.youtube.com/watch?v=6UQZ5oQg8XA | |
| ### iwr -useb https://christitus.com/win | iex | |
| ### | |
| ### OR take a look at | |
| ### https://github.com/HotCakeX/Harden-Windows-Security |
| // ==UserScript== | |
| // @name iHned Paywall Remover | |
| // @namespace http://ihned.cz | |
| // @description Removes iHned paywall cookie | |
| // @include http:/ihned.cz/* | |
| // @include http://*.ihned.cz/* | |
| // @version 2 | |
| // @grant none | |
| // ==/UserScript== | |
| document.cookie = "pw=; path=/; domain=.ihned.cz; expires=Thu, 01-Jan-1970 00:00:01 GMT;"; |
| # Add references to SharePoint client assemblies and authenticate to Office 365 site - required for CSOM | |
| Add-Type -Path “C:\Program Files\Common Files\microsoft shared\Web Server Extensions\15\ISAPI\Microsoft.SharePoint.Client.dll” | |
| Add-Type -Path “C:\Program Files\Common Files\microsoft shared\Web Server Extensions\15\ISAPI\Microsoft.SharePoint.Client.Runtime.dll” | |
| Add-Type -Path “C:\Program Files\Common Files\microsoft shared\Web Server Extensions\15\ISAPI\Microsoft.SharePoint.Client.WorkflowServices.dll” | |
| # Specify tenant admin and site URL | |
| $SiteUrl = "mysiteurl" | |
| $ListName = "mylistname" | |
| $UserName = "myusername" | |
| $SecurePassword = ConvertTo-SecureString "mypassword" -AsPlainText -Force |
1.) If I have a data.frame df <- data.frame(a = c(1, 2, 3), b = c(4, 5, 6), c(7, 8, 9))...
1a.) How do I select the c(4, 5, 6)?
1b.) How do I select the 1?
1c.) How do I select the 5?
1d.) What is df[, 3]?
| class MultiFormMixin(ContextMixin): | |
| form_classes = {} | |
| prefixes = {} | |
| success_urls = {} | |
| grouped_forms = {} | |
| initial = {} | |
| prefix = None | |
| success_url = None |
| #!/bin/bash | |
| target_branch="production" | |
| working_tree="PATH_TO_DEPLOY" | |
| while read oldrev newrev refname | |
| do | |
| branch=$(git rev-parse --symbolic --abbrev-ref $refname) | |
| if [ -n "$branch" ] && [ "$target_branch" == "$branch" ]; then | |
| library(shiny) | |
| library(ggplot2) | |
| function(input, output) { | |
| dataset <- reactive({ | |
| diamonds[sample(nrow(diamonds), input$sampleSize),] | |
| }) | |
| output$plot <- renderPlot({ |