void OutputSVG(const std::string& svg_path, double svg_scale,
const DIA<DataPoint<Vector> >& point_dia,
const Vector& model) {
double width = 0, height = 0, min_vert = 0, max_vert = 0, min_hor = 0, max_hor = 0;
std::vector<DataPoint<Vector> > list = point_dia.Gather();
for (const DataPoint<Vector>& p : list) {
min_hor = std::min(min_hor, p.data.x[0]);
max_hor = std::max(max_hor, p.data.x[0]);
min_vert = std::min(min_vert, p.label);
max_vert = std::max(max_vert, p.label);
}
double weight = model.x[0];
double y1 = min_hor * weight;
double y2 = max_hor * weight;
min_vert = std::min(min_vert, y1);
min_vert = std::min(min_vert, y2);
max_vert = std::max(max_vert, y1);
max_vert = std::max(max_vert, y2);
width = max_hor - min_hor;
height = max_vert - min_vert;
std::ofstream os(svg_path);
os << "<?xml version=\"1.0\" encoding=\"UTF-8\" standalone=\"no\"?>\n";
os << "<svg\n";
os << " xmlns:dc=\"http://purl.org/dc/elements/1.1/\"\n";
os << " xmlns:cc=\"http://creativecommons.org/ns#\"\n";
os << " xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\"\n";
os << " xmlns:svg=\"http://www.w3.org/2000/svg\"\n";
os << " xmlns=\"http://www.w3.org/2000/svg\"\n";
os << " version=\"1.1\" id=\"svg2\" width=\"" << width * svg_scale
<< "\" height=\"" << height * svg_scale << "\">\n";
os << " <g id=\"layer1\">\n";
// Draw grid
os << " <line x1=\"0\" y1=\"" << (height + min_vert) * svg_scale
<< "\" x2=\"" << width * svg_scale << "\" y2=\"" << (height + min_vert) * svg_scale
<< "\" stroke-width=\"1\" stroke=\"#777777\" style=\"stroke-opacity:0.3\" />\n";
os << " <line x1=\"" << -min_hor * svg_scale << "\" y1=\"0\""
<< " x2=\"" << -min_hor * svg_scale << "\" y2=\"" << height * svg_scale
<< "\" stroke-width=\"1\" stroke=\"#777777\" style=\"stroke-opacity:0.3\" />\n";
// Draw points
for (const DataPoint<Vector>& p : list) {
os << " <circle r=\"1\" cx=\"" << (p.data.x[0] - min_hor) * svg_scale
<< "\" cy=\"" << (height - p.label + min_vert) * svg_scale
<< "\" style=\"stroke:none;stroke-opacity:1;fill:#45a2d1;fill-opacity:1\" />\n";
}
// Draw line
os << " <line x1=\"0\" y1=\"" << (height - y1 + min_vert) * svg_scale
<< "\" x2=\"" << width * svg_scale << "\" y2=\"" << (height - y2 + min_vert) * svg_scale
<< "\" stroke-width=\"1\" stroke=\"#ff9900\" />\n";
os << " </g>\n";
os << "</svg>\n";
}
ValueType Select(const DIA<ValueType, InStack>& data, size_t rank,
const Compare& compare = Compare()) {
api::Context& ctx = data.context();
const size_t size = data.Size();
assert(0 <= rank && rank < size);
if (size <= base_case_size) {
// base case, gather all data at worker with rank 0
ValueType result = ValueType();
auto elements = data.Gather();
if (ctx.my_rank() == 0) {
assert(rank < elements.size());
std::nth_element(elements.begin(), elements.begin() + rank,
elements.end(), compare);
result = elements[rank];
LOG << "base case: " << size << " elements remaining, result is "
<< result;
}
result = ctx.net.Broadcast(result);
return result;
}
ValueType left_pivot, right_pivot;
std::tie(left_pivot, right_pivot) = PickPivots(data, size, rank, compare);
size_t left_size, middle_size, right_size;
using PartSizes = std::pair<size_t, size_t>;
std::tie(left_size, middle_size) =
data.Map(
[&](const ValueType& elem) -> PartSizes {
if (compare(elem, left_pivot))
return PartSizes { 1, 0 };
else if (!compare(right_pivot, elem))
return PartSizes { 0, 1 };
else
return PartSizes { 0, 0 };
})
.Sum(
[](const PartSizes& a, const PartSizes& b) -> PartSizes {
return PartSizes { a.first + b.first, a.second + b.second };
},
PartSizes { 0, 0 });
right_size = size - left_size - middle_size;
LOGM << "left_size = " << left_size << ", middle_size = " << middle_size
<< ", right_size = " << right_size << ", rank = " << rank;
if (rank == left_size) {
// all the elements strictly smaller than the left pivot are on the left
// side -> left_size-th element is the left pivot
LOGM << "result is left pivot: " << left_pivot;
return left_pivot;
}
else if (rank == left_size + middle_size - 1) {
// only the elements strictly greater than the right pivot are on the
// right side, so the result is the right pivot in this case
LOGM << "result is right pivot: " << right_pivot;
return right_pivot;
}
else if (rank < left_size) {
// recurse on the left partition
LOGM << "Recursing left, " << left_size
<< " elements remaining (rank = " << rank << ")\n";
auto left = data.Filter(
[&](const ValueType& elem) -> bool {
return compare(elem, left_pivot);
}).Collapse();
assert(left.Size() == left_size);
return Select(left, rank, compare);
}
else if (left_size + middle_size <= rank) {
// recurse on the right partition
LOGM << "Recursing right, " << right_size
<< " elements remaining (rank = " << rank - left_size - middle_size
<< ")\n";
auto right = data.Filter(
[&](const ValueType& elem) -> bool {
return compare(right_pivot, elem);
}).Collapse();
assert(right.Size() == right_size);
return Select(right, rank - left_size - middle_size, compare);
}
else {
// recurse on the middle partition
LOGM << "Recursing middle, " << middle_size
<< " elements remaining (rank = " << rank - left_size << ")\n";
auto middle = data.Filter(
[&](const ValueType& elem) -> bool {
return !compare(elem, left_pivot) &&
!compare(right_pivot, elem);
}).Collapse();
assert(middle.Size() == middle_size);
return Select(middle, rank - left_size, compare);
}
}
