Archives
Trending
Support
Login
clear text
XML
Django
JavaScript
MATLAB
C
C++
C#
Python
SQL
Shell
Bash
Markdown
YAML
JSON
HTML
CSS
PHP
Java
Ruby
Go
Rust
Swift
Kotlin
Arduino
TypeScript
Perl
Autohotkey
Lua
SQF
R
Scala
Haskell
Groovy
Dart
Clojure
VB.NET
Objective-C
PowerShell
Bash
CoffeeScript
Verilog
# http://news.bbc.co.uk/2/hi/programmes/more_or_less/8735812.stm one_child <- expand.grid( sex=c("Boy", "Girl"), wday=c("Mo", "Tue", "We", "Th", "Fr", "Sa", "Su") ) |> transform(sex_wday=paste(sex, "-", wday)) |> subset(select="sex_wday") |> unlist() |> unname() two_children <- expand.grid(first=one_child, second=one_child, stringsAsFactors=FALSE) |> transform( tuesday_boy=grepl("Boy - Tue", first) | grepl("Boy - Tue", second), two_boys=grepl("Boy", first) & grepl("Boy", second) ) sum(two_children$tuesday_boy & two_children$two_boys) / sum(two_children$tuesday_boy)
Mark as private (unlisted)
for 30 minutes
for 6 hours
for 1 day
for 1 week
for 1 month
for 1 year
everlasting (like CCCP)
