#[allow(unused_imports)]
use std::cmp::{max, min};
#[allow(unused_imports)]
use std::collections::{BTreeMap, BTreeSet, BinaryHeap, HashMap, HashSet, VecDeque};
#[allow(unused_imports)]
use std::fs::File;
#[allow(unused_imports)]
use std::io::prelude::*;
#[allow(unused_imports)]
use std::io::{stdin, stdout, BufReader, BufWriter, Stdin, Stdout, Write};
#[allow(unused_imports)]
use std::mem::swap;
#[allow(unused_imports)]
use std::str::FromStr;
#[allow(unused_imports)]
use std::char::from_digit;
 
type BoxResult<T> = Result<T, Box<std::error::Error>>;
 

fn main() {
    let mut scanner = Scanner::new(stdin());
    let param = scanner.read_vector::<usize>().unwrap();
    let (n, k) = (param[0], param[1]);
    let mut arr = vec![];
    for _ in 0..n {
        let line = scanner.read_vector::<usize>().unwrap();
        let (t, d) = (line[0] - 1, line[1]);
        arr.push((d, t));
    }
    arr.sort_by(|a, b| b.cmp(&a));
    let mut count = vec![0; n];
    let mut ans = 0;
    let mut kind = 0;
    for i in 0..k {
        ans += arr[i].0;
        if count[arr[i].1] == 0 {
            ans += 2 * kind + 1;
            kind += 1;
        }
        count[arr[i].1] += 1;
    }
    let mut used_index = k - 1;
    let mut index = k;
    let mut crt = ans;
    while index < n {
        while used_index > 0 && count[arr[used_index].1] == 1 {
            used_index -= 1;
        }
        if used_index == 0 {
            break;
        }
        while index < n && count[arr[index].1] > 0 {
            index += 1;
        }
        if index == n {
            break;
        }
        crt = crt - arr[used_index].0 + arr[index].0 + 2 * kind + 1;
        ans = max(crt, ans);
        kind += 1;
        count[arr[used_index].1] -= 1;
        count[arr[index].1] += 1;
        used_index -= 1;
        index += 1;
    }
    println!("{}", ans);
}



#[allow(dead_code)]
struct Scanner<R> {
    reader: BufReader<R>,
    buffer: String,
}
 
impl<R> Scanner<R>
where
    R: Read,
{
    #[allow(dead_code)]
    fn new(inner: R) -> Scanner<R> {
        let reader = BufReader::new(inner);
        let buffer = String::new();
        Scanner {
            reader: reader,
            buffer: buffer,
        }
    }
 
    #[allow(dead_code)]
    fn with_capacity(capacity: usize, inner: R) -> Scanner<R> {
        let reader = BufReader::with_capacity(capacity, inner);
        let buffer = String::new();
        Scanner {
            reader: reader,
            buffer: buffer,
        }
    }

    #[allow(dead_code)]
    fn read_line(&mut self) -> BoxResult<String> {
        self.reader.read_line(&mut self.buffer)?;
        let cloned = self.buffer.trim().to_string();
        self.buffer.clear();
        Ok(cloned)
    }

    #[allow(dead_code)]
    fn read<T>(&mut self) -> BoxResult<T>
    where
        T: FromStr,
        T::Err: std::fmt::Debug,
        T::Err: std::error::Error,
        T::Err: 'static,
    {
        self.reader.read_line(&mut self.buffer)?;
        let parsed = self.buffer.trim().parse()?;
        self.buffer.clear();
        Ok(parsed)
    }
 
    #[allow(dead_code)]
    fn read_vector<T>(&mut self) -> BoxResult<Vec<T>>
    where
        T: FromStr,
        T::Err: std::fmt::Debug,
        T::Err: std::error::Error,
        T::Err: 'static,
    {
        self.reader.read_line(&mut self.buffer)?;
        let parsed_vec = self
            .buffer
            .trim()
            .split_whitespace()
            .map(|s| s.parse())
            .collect::<Result<Vec<_>, _>>()?;
        self.buffer.clear();
        Ok(parsed_vec)
    }
 
    #[allow(dead_code)]
    fn read_matrix<T>(&mut self, lines: usize) -> BoxResult<Vec<Vec<T>>>
    where
        T: FromStr,
        T::Err: std::fmt::Debug,
        T::Err: std::error::Error,
        T::Err: 'static,
    {
        let mut parsed_matrix = vec![];
        for _ in 0..lines {
            self.reader.read_line(&mut self.buffer)?;
            parsed_matrix.push(
                self.buffer
                    .trim()
                    .split_whitespace()
                    .map(|s| s.parse())
                    .collect::<Result<Vec<_>, _>>()?,
            );
            self.buffer.clear();
        }
        Ok(parsed_matrix)
    }
 
    #[allow(dead_code)]
    fn read_chars(&mut self) -> BoxResult<Vec<char>> {
        self.reader.read_line(&mut self.buffer)?;
        let chars = self.buffer.trim().chars().collect::<Vec<_>>();
        self.buffer.clear();
        Ok(chars)
    }
}

Measured memory_bytes: 6396