R Code Simplifier

def quick_sort(arr):
 
 if len(arr) <= 1:
 return arr
 pivot = arr[len(arr) // 2]
 left = [x for x in arr if x < pivot]
 middle = [x for x in arr if x == pivot]
 right = [x for x in arr if x > pivot]
 return quick_sort(left) + middle + quick_sort(right)

SELECT COUNT(DISTINCT CASE WHEN condition THEN id ELSE NULL END) FROM table

value = 'Hello World'
try:
 print(value)
except NameError:
 print('Variable is not defined')
else:
 print('Variable is defined')
finally:
 print('The finally statement is executed')

public class Singleton {
 private static Singleton single_instance = null;
  
 public String s;
 private Singleton() { s = 'Hello I am a singleton!'; }
 public static Singleton Singleton() { if (single_instance == null) single_instance = new Singleton(); return single_instance; }}

map(lambda x: x**2, filter(lambda x: x%2 == 0, range(10)))

def decorator_func(func):
 def wrap_func():
 print('Before function execution')
 func()
 print('After function execution')
 return wrap_func
@decorator_func
def display_func():
 print('Inside the function')
display_func()

async def main():
 task1 = asyncio.create_task(do_something(1))
 task2 = asyncio.create_task(do_something(2))
 await task1
 await task2
asyncio.run(main())

int binary_search(int array[], int size, int target) {
 int start = 0;
 int end = size - 1;
 while (start <= end) {
 int mid = (start + end) / 2;
 if (array[mid] == target) return mid;
 else if (array[mid] < target) start = mid + 1;
 else end = mid - 1; }
 return -1; }

SELECT EmployeeID, COUNT(DISTINCT OrderID) as NumberOfOrders FROM Orders GROUP BY EmployeeID HAVING COUNT(DISTINCT CustomerID) > 1 ORDER BY NumberOfOrders

library(ggplot2)
iris$Species = factor(iris$Species)
qplot(Sepal.Length, Petal.Length, data = iris, color = Species)